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INTRODUZIONE 


Per descrivere l'organizzazione generale di un calcolatore, il paragone più 
immediato che viene in mente è la struttura del cervello umano. Ogni nostra 
azione è subordinata ad un insieme di entità che cercheremo di mettere in 
relazione con gli elementi costitutivi di un elaboratore elettronico. Le nostre 
azioni più semplici e immediate sono comandate dal cervello in base a cono¬ 
scenze ataviche che esistono in noi. 

Ad esempio la sequenza di operazioni che compiamo per spostare un 
braccio quando la mano è vicina ad una fonte di dolore, sono indipendenti 
dalla nostra volontà e afferiscono ad una zona di memoria con conoscenze 
primitive. 

Operiamo ad un livello diverso quando cerchiamo di compiere operazioni 
che si ricollegano ad esperienze precedenti. Ad esempio per scrivere una 
frase ci rivolgiamo ad un’area del cervello in cui sono memorizzate le nostre 
esperienze in fatto di scrittura (regole grammaticali, utilizzo di una penna, 
ecc.). Quest'ultima memoria é ben difficilmente scindibile da una terza me¬ 
moria che contiene i "dati” su cui operiamo. Questa parte conterrà ad esem¬ 
pio le lettere dell’alfabeto che ci serviranno per scrivere o le tabelline aritme¬ 
tiche che utilizzeremo se desideriamo fare qualche semplice operazione. 

Siamo giunti così a descrivere un sistema così costituito: 



Figura 1.1 
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Evidentemente ciò non schematizza completamente il sistema "uomo”. In 
aggiunta vi sono dei canali di ingresso, che permettono di acquisire dal mon¬ 
do esterno gli elementi da elaborare ed inserire nella memoria dati e nella 
memoria esperienze (tramite la vista, l’udito, il tatto, ecc.). 

Analogamente vi saranno dei canali di uscita che permettono il collega¬ 
mento dal cervello verso l’esterno (tramite ad esempio la parola). Questi 
due canali verranno chiamati "canali di ingresso-uscita” (I/O, input-output). 

Siamo così giunti alla struttura completa: 



Figura 1.2 

Il parallelo a questo punto é completo. Il cervello umano può essere mes¬ 
so in relazione con l’Unità Centrale di Elaborazione; la memoria atavica con 
il cosiddetto Sistema Operativo, cioè quella parte del sistema che si occupa 
della gestione al livello più elementare. La memoria esperienze rappresenta 
il Programma che l’utente scrive, cioè un insieme di operazioni descritte in 
termini comprensibili all'Unità Centrale. L’area dati contiene gli effettivi dati 
che vengono passati al calcolatore o che sono frutto di successive elabora¬ 
zioni. L’Input/Output rappresenta la via attraverso cui il calcolatore colloquia 
con l'esterno (terminale video, tastiera, stampante, dischi, ecc.). 

Si ottiene così la struttura generale del calcolatore che analizzeremo nel 
prossimo capitolo. 


VI 








Prima parte 

CAPITOLO 1 v 

INTRODUZIONE ALLA PROGRAMMAZIONE 


Riprendendo lo schema del calcolatore introdotto nel capitolo precedente 
(vedi anche Figura 1.3), riconosciamo le seguenti unità: 

— unità centrale o processore (P) 

— memoria principale (M) 

— dispositivi periferici di Ingresso-Uscita (I/O) 



Figura 1.3 


Esigenze di semplicità costruttiva hanno eliminato più vie di colloquio con 
l’Unità Centrale, riducendole ad un unico canale di collegamento (UNIBUS). 
Le memorie prima definite vengono raggruppate in un’unica unità fisica. 
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La memoria principale è essenzialmente un magazzino di informazioni, 
che possono essere sia "dati” che “istruzioni". I dati sono le entità numeri¬ 
che o alfabetiche elaborate dal processore, o che sono risultate da elabora¬ 
zioni precedenti. Le istruzioni (statements) sono i comandi che specificano 
il modo di operare sui dati. L’insieme ordinato delle istruzioni forma il "pro¬ 
gramma”. 

In generale, programmi e dati sono memorizzati in zone di memoria diffe¬ 
renti, per evitare che il processore interpreti dati come istruzioni e vicever¬ 
sa. Inoltre per istruzioni adibite al controllo del funzionamento della macchi¬ 
na, è preferibile una memorizzazione in speciali memoria a sola lettura 
(ROM) per avere una protezione da errori di cancellazione o di riscrittura 
durante il funzionamento. 

Il processore, che rappresenta l’unità operativa del sistema, ha il compito 
di elaborare le istruzioni di un programma, normalmente prelevandole dalla 
memoria, ed interagendo parzialmente o totalmente con le unità di I/O du¬ 
rante le loro comunicazioni con la memoria principale. 

Tipiche funzioni di Processore sono: 

— chiamata dell’istruzione 

— decodifica 

— esecuzione 

— analisi di eventuali segnali da parte delle I/O e della memoria 

L'insieme delle unità di I/O ha il compito di permettere il colloquio tra il 
calcolatore e l'ambiente esterno. A seconda del sistema a cui ci si riferisce, 
queste unità possono comprendere veri e propri processori specializzati ver¬ 
so il controllo di un certo numero di vie di dati da/verso i dispositivi periferici; 
in ogni caso, saranno sempre presenti delle unità adibite alla gestione delle 
operazioni tipiche di ogni dispositivo (lettura/scrittura di caratteri o stringhe 
o records, posizionamento, partenza, stop, ecc.) ed al loro interfacciamento 
con l’unità centrale. Tipiche unità di I/O sono i terminali, le stampanti, le u- 
nità di memorizzazione di massa (dischi, nastri, ecc.). 

Tutte le unità appena descritte sono connesse tramite un gruppo di linee 
di trasmissione che costituiscono il cosiddetto “BUS”, cioè una sorta di ca¬ 
nale (controllato dal processore), attraverso il quale passano tutte le infor¬ 
mazioni in gioco nel sistema. 

Nella figura 1.4 abbiamo una schematizzazione del PET 8032 della COM- 
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MODORE, in cui si possono osservare la tastiera (unità di ingresso), il video 
(unità di uscita), e il dispositivo di gestione dei dischi (unità di ingresso/usci¬ 
ta), la stampante (unità di uscita) e la memoria principale (unità di ingres¬ 
so/uscita). 



CAPITOLO 2 


IL SISTEMA BINARIO 


Un calcolatore è in grado di riconoscere solamente la presenza o l’assen¬ 
za di tensione ai capi di un morsetto. È possibile costruire un sistema in cui 
l’oggetto base è un’entità che assume solamente due stati (sistema binario). 
In questo sistema, l’unità elementare è il BIT (binary digit), il quale può as¬ 
sumere solamente due valori rappresentati dai simboli ’O' e ‘1 ’. Con un bit 
quindi si può rappresentare il verificarsi o meno di un evento semplice. Per 
esempio: 

— bit=0 lampadina spenta 

— bit=1 lampadina accesa 


Con due bit si può 
— bit=0,bit—0 


— bit=0,bit=1 


— bit=1 ,bit=0 


— bit=1 ,bit=1 


descrivere un evento composto. Ad esempio: 
lampadina spentaci notte 

lampadina spenta,di giorno 

lampadina accesa,di notte 

lampadina accesa,di giorno 


Per avere la possibilità di rappresentare eventi di natura più complessa, si 
definisce il BYTE, cioè un insieme di 8 bit, con cui si può rappresentare fino 
a 256 aspetti diversi di un evento, tanti quante sono le possibili configurazio¬ 
ni degli 8 bit del byte. 

Il byte, come entità singola, viene utilizzato per rappresentare i dati in me- 
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moria (per esempio le lettere dell’alfabeto, le cifre decimali, i caratteri spe¬ 
ciali quali la punteggiatura, ecc.), i numeri in binario ed alcuni comandi stan¬ 
dard. 

Facciamo qualche esempio. Se si usasse il seguente codice: 
il byte 11000001 per la lettera A 

il byte 11000010 per la lettera B 

il byte 11000011 per la lettera C 

la sequenza BAC sarebbe memorizzata con l'espressione: 

11000010 11000001 11000011 

Si noti che sono necessari 24 simboli binari per rappresentare soltanto 3 
lettere dell’alfabeto. 

Si opera analogamente per i caratteri che rappresentano le cifre decimali: 
facciamo bene attenzione a non confondere l’entità astratta numero, con le 
cifre usate per rappresentarlo: il numero 128 è ben diverso dalla sequenza di 
cifre “128” (uno due otto). Se supponiamo di codificare il carattere 4 con il 
byte 11110100 e il carattere 3 con il byte 11110011, la sequenza A4C3 è me¬ 
morizzata con l’espressione: 

11000001 11110100 11000011 11110011 

Considerando ora che ogni informazione (dato o istruzione) che viene for¬ 
nita al calcolatore deve necessariamente essere espressa nel sistema bina¬ 
rio, si comprende che risulterebbe estremamente disagevole l’uso del com¬ 
puter (un programma di media grandezza è composto da migliaia di bytes), 
se il colloquio per l’utente dovesse avvenire esclusivamente in forma binaria. 

Un piccolo passo avanti per l’utente si è avuto con l'introduzione del siste¬ 
ma esadecimale, nel quale vengono codificati in un solo simbolo quattro bit, 
e quindi un byte può essere espresso con soli due simboli esadecimali. Il no¬ 
me esadecimale deriva dal fatto che sono necessari 16 simboli diversi per 
codificare le 16 configurazioni possibili dei quattro bit. I 16 simboli usati so¬ 
no le 10 cifre decimali, più le prime 6 lettere dell’alfabeto, e la codifica è la 
seguente: 

0000 0 
0001 1 
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0010 2 
0011 3 

0100 4 

0101 5 

0110 6 
Olii 7 
1000 8 
1001 9 

1010 A 

1011 B 

1100 C 

1101 D 

1110 E 

1111 F 

Tornando ai due esempi del sistema binario, ora si avrebbe: 

C2C1C3 per la sequenza BAC 
CI F4C3F3 per la stringa A4C3 

Rimane sottointeso però, che questa notazione è utilizzata solo dall’uten¬ 
te, e che all’interno del computer ci sarà sempre l’espressione in binario. 

Un eventuale programma interno penserà a fare le opportune traduzioni 
dell’esadesimale al binario, e viceversa. 
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CAPITOLO 3 


IL SISTEMA DI NUMERAZIONE BINARIA 


Abbiamo già osservato che il computer tratta le cifre numeriche come ca¬ 
ratteri qualsiasi, codificandole opportunamente in byte, e la codifica può va¬ 
riare notevolmente da computer a computer. 

Ciò non accade per i numeri, i quali sono direttamente rappresentati sfrut¬ 
tando le regole deN’aritmetica binaria. Questa aritmetica è analoga a quella 

classica decimale, con la differenza che al posto delle dieci cifre (0,1,2. 

9), se ne usano solamente due: lo 0 e l’I. 

Tuttavia i numeri sono interpretati con lo stesso meccanismo. Nel sistema 
decimale per esempio, le cifre che rappresentano un numero sono disposte 
da destra verso sinistra secondo potenze crescenti di 10 (10 è la base del si¬ 
stema decimale): 

1304 dee = IxlO 3 + 3x10 2 + OxlO 1 + 4x10° 

Analogamente avviene per i numeri espressi in binario (in cui la base del¬ 
l'aritmetica è 2): 

10011 bin = 1x2 4 + 0x2 3 + 0x2 2 + 1x2' +- 1x2° = 19 dee 

Facciamo qualche altro esempio di trasformazione di numeri dal binario al 
decimale: 

00110100 bin = 0x2 7 + 0x2 6 + 1x2 5 + 1x2 4 + 0x2 3 + 1x2 2 + 0x2’ 
+ 0x2° = 52 dee 

11111111 bin = 255dec 

00000000 bin = Odec 

10000000 bin = 128 dee 
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Per la trasformazione inversa, si opera nel seguente modo: si divide il nu¬ 
mero decimale per 2 e si prende il resto di questa divisione come la cifra 
meno significativa del numero binario risultante; poi si considera il quoziente 
della divisione e lo si divide ancora per 2: il nuovo resto è la seconda cifra 
meno significativa del risultato; si considera ora il secondo quoziente e si 
procede analogamente a quanto già detto, fino ad ottenere come quoziente 
lo 0 e come resto l’I. 


ESEMPIO: si vuole trasformare il numero 57 decimale nel corrispon¬ 
dente numero binario. 

Dividiamo 57 per 2: 

57:2 = 28 con resto 1 

Si ottiene il quoziente 28 e il resto 1: questo è la cifra meno significati¬ 
va del risultato; dividiamo ora 28 per due: 

28:2 = 14 con resto 0 

Il 14 è il nuovo quoziente e 0 è la seconda cifra che andrà a formare il 
numero binario; procedendo nello stesso modo si avrà: 

14:2 = 7 con resto 0; 7:2 = 1 con resto 1; 

3:2 = 1 con resto 1; 1:2 = 0 con resto 1; 

Il resto dell’ultima divisione dà la cifra più significativa del risultato: 
57 dee = 111001 bin 

Se vogliamo standardizzare ad 8 bit il numero ottenuto, basta aggiun¬ 
gere alcuni zeri a sinistra fino a formare l’ottetto: 

57 dee = 00111001 bin 

Il numero decimale 57 è quindi rappresentato in binario dal byte 
00111001 . 


Altri esempi:- 

63 dee = 00111111 bin 
32 dee = 00100000 bin 
0 dee = 00000000 bin 
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ESERCIZIO 


1 . trasformare in binario i seguenti numeri espressi in’forma decima¬ 
le: 

25, 127, 65, 100 

2. trovare il valore in base 10 dei seguenti numeri espressi in base 2: 

10110101 

00001111 

01010101 

11111110 

3. trovare l’espressione esadecimale dei numeri proposti negli esem¬ 
pi 1. e 2. 
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CAPITOLO 4 


EVOLUZIONE DEI LINGUAGGI 


Abbiamo visto che il computer è capace di interpretare solo informazioni 
codificate opportunamente nel sistema binario. Le regole con cui vengono 
codificate le informazioni costituiscono un linguaggio per il calcolatore, det¬ 
to linguaggio macchina o linguaggio direttamente interpretabile dal compu¬ 
ter. 

Anche le espressioni in esadecimale possono essere considerate un lin¬ 
guaggio macchina, in quanto la traduzione in binario è estremamente sem¬ 
plice. 


Un passo avanti nell'uso più razionale delle risorse del computer si è con¬ 
seguito con l’introduzione dei linguaggi simbolici (chiamati così per differen¬ 
ziarli dai linguaggi macchina precedenti). Un esempio di questo tipo di lin¬ 
guaggi è l’ASSEMBLER. 

Questo linguaggio associa ad informazioni specifiche dei nomi simbolici, 
più espressivi e quindi più facilmente trattabili. Supponiamo che in un parti¬ 
colare codice l’operazione di somma sia espressa con il byte 01101101, che 
il primo addendo sia 11000100 10110100 (il numero 66740 in binario) ed il 
secondo sia 00110110 01110010 (il numero 13938). 

AM’interno del calcolatore l’istruzione di somma per i due addendi potreb¬ 
be essere specificata con la terna di informazioni: 

01101101 

11000100 10110100 

00110110 01110010 
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L'utente, utilizzando il sistema esadecimale avrebbe solo una notevole 
semplificazione di scrittura/lettura, ma non di leggibilità: 

6D C4B4 3672 

Se invece si associa al byte della somma, il nome simbolico ADD, al pri¬ 
mo addendo il nome ADDENDOI, al secondo il nome ADDEND02, la nota¬ 
zione precedente diventa: 

ADD, ADDENDOI, ADDEND02 

Quest'ultimo modo di scrivere un'istruzione è sufficiente per raggiungere 
una certa leggibilità dei comandi inviati al calcolatore. 

In definitiva, ad ogni istruzione è associato un nome simbolico che ne ri¬ 
chiama il significato, e i dati sono trattati più semplicemente associando an¬ 
che ad essi nomi simbolici. Naturalmente la traduzione dal linguaggio AS¬ 
SEMBLER al sistema binario è più complessa che dall’esadecimale al bina¬ 
rio: tuttavia l’uso di questi linguaggi ha fornito un primo notevole sviluppo dei 
sistemi di calcolo. 

Con i linguaggi di tipo assembler, rimangono però tuttora presenti molte 
difficoltà di programmazione. 

Per esempio questi sono molto legati alla macchina usata, quindi il pro¬ 
grammatore deve conoscerne molto bene l’architettura; inoltre è necessario 
studiare il problema da risolvere in modo molto analitico e dettagliato. Per e- 
sempio è necessario controllare ad un livello molto basso (cioè controllando 
passo per passo ogni più piccola operazione) tutti i dispositivi presenti nel si¬ 
stema di elaborazione: dalle locazioni di memoria (gli indirizzi dei byte di 
memoria che sono usati per i programmi e per i dati), ai dispositivi periferici. 
Infine i programmi non sono trasportabili da un sistema ad un altro e non è 
possibile programmare in maniera veloce. 

Per superare queste limitazioni si è passati ai linguaggi cosiddetti “ad alto 
livello", dove il programmatore non è tenuto a conoscere la struttura interna 
della macchina ed è legato soltanto al rispetto delle regole del linguaggio u- 
sato. In secondo luogo questo tipo di linguaggi è notevolmente più potente 
nella risoluzione di problemi che richiedono l’uso del calcolatore. Infine essi 
sono praticamente indipendenti dai sistemi di elaborazione usati, permetten¬ 
do quindi il trasporto dei programmi da una macchina ad un’altra. 
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È appena il caso di aggiungere che ogni programma, scritto in un linguag¬ 
gio evoluto, dovrà poi essere tradotto (da opportuni programmi interni: i 
compilatori o gli interpreti) in linguaggio macchina, cioè in un codice binario, 
prima di poter essere eseguito. 
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CAPITOLO 5 


STRUTTURA BASE DI UN PROGRAMMA 


Un generico programma può essere scomposto in segmenti logicamente 
separabili fra loro e che appartengono alle categorie di MAIN (o programma 
principale), SUBROUTINE e FUNCTION. 


MAIN 
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In ogni programma esiste un solo MAIN che controlla il flusso dell’intera 
elaborazione. Nell’ambito del MAIN ci possono essere delle interruzioni nel¬ 
la sequenzialità di esecuzione delle istruzioni, con opportuni salti a particola¬ 
ri sottoprogrammi. Le FUNCTIONS e le SUBROUTINES sono utilizzate per 
svolgere certe funzioni o certe elaborazioni, che possono rendersi necessa¬ 
rie una o più volte nel corso di esecuzione del programma principale. In Fi¬ 
gura 5.5 è rappresentato il flusso di esecuzione del programma principale e 
di una SUBROUTiNE. 

Nei punti A e B avviene l’interruzione del programma MAIN, con conse¬ 
guente salto al sottoprogramma SUBROUTINE. Una volta che la SUBROU- 
TINE é stata eseguita, il controllo ritorna al MAIN per mezzo di un “salto di 
ritorno”. 

Una SUBROUTINE può, a sua volta, chiamare un’altra SUBROUTINE; e 
questa chiamarne un’altra ancora, e così di seguito. Questo tipo di struttura 
é detto annidamento. In generale i sistemi di elaborazione pongono un limite 
massimo al numero di SUBROUTINE annidate. 

L’impiego di sottoprogrammi permette, oltre ad un certo risparmio di lun¬ 
ghezza del programma, anche una maggiore organizzazione logica (struttu¬ 
razione) del flusso di esecuzione delle istruzioni, con una conseguente mag¬ 
giore facilità di lettura e di interpretazione dei programmi nel loro comples¬ 
so. 

Una FUNCTION é concettualmente simile ad una SUBROUTINE. L’unica 
differenza consiste nel fatto che, la prima restituisce un unico valore calco¬ 
lato, mentre la seconda esegue esclusivamente un flusso logico di program¬ 
ma. 

Un esempio di FUNCTION può essere la funzione SOR del BASIC. Questa 
funzione serve per calcolare la radice quadrata di un numero: 

Y=SQR(X) 

Nella istruzione BASIC appena scritta, la funzione SOR calcola la radice 
del numero rappresentato dalla variabile X e restituisce tale valore, asse¬ 
gnandolo alla variabile Y. 
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CAPITOLO 6 


COSTANTI E VARIABILI DI UN PROGRAMMA 


Sono le entità base su cui opera ogni programma. 

I dati di tipo costante non cambiano il loro valore per tutto il tempo di vita 
del programma. Nonostante piccole differenze da calcolatore a calcolatore, 
ne esistono sostanzialmente di due tipi: numeriche e simboliche (alfanume¬ 
riche). 

I dati di tipo variabile sono dei nomi con cui vengono indicati opportuni 
campi di memoria. In queste aree sono contenuti i valori che si riferiscono ai 
nomi suddetti. Il valore di una variabile le può essere assegnato direttamen¬ 
te dal programmatore, oppure può essere il risultato di calcoli compiuti dal 
programma. Per esempio se scriviamo: 


8=3 


l’area di memoria riservata alla variabile B assume il valore numerico 3. Se 
poi scriviamo: 

A=B+2 


l'area di memoria riservata alla nuova variabile A assume un valore pari alla 
somma di quello relativo alla variabile B e della costante numerica 2. In defi¬ 
nitiva quindi nell’area di memoria assegnata ad A viene immagazzinato il va¬ 
lore numerico 5. 

Naturalmente é possibile anche la seguente notazione: 

A=A+1 


la quale sta a significare che il nuovo valore assegnato ad A é quello prece¬ 
dente incrementato di 1. 
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Si noti che il simbolo uguale '=’ ha un significato diverso da quello normal¬ 
mente assegnato, cioè di uguaglianza della parte destra con la parte sinistra 
del simbolo. Esso deve qui intendersi come un aggiornamento dell’area di 
memoria riservata alla variabile specifica a sinistra di tale simbolo. 
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Seconda parte 

CAPITOLO 1 

IL LINGUAGGIO BASIC 


LE COSTANTI 

Le COSTANTI DI TIPO STRINGA (o simboliche), sono costituite da una 
successione di caratteri quali lettere dell’alfabeto, cifre e ogni altro simbolo 
presente nella tastiera racchiuso tra virgolette. 

L'intera stringa può contenere al massimo 255 caratteri. 

ESEMPIO: 

corretti sbagliati 

“ESEMPI012” LUN 

“12.15” 12.152” 

“SABATO” “MARZO” 

“P#.3 & ASD + < >’$%3.465” 


Le COSTANTI NUMERICHE rappresentano dei valori esclusivamente nu¬ 
merici. Possono essere positive o negative, intere o con parte intera e parte 
decimale. Per separare la parte intera da quella decimale si usa, seguendo 
la notazione anglosassone, il punto anziché la virgola. 

Le costanti intere sono un qualsiasi numero intero compreso tra —32768 e 
+32767. Non hanno il punto decimale. Il “range” (l’intervallo) entro cui pos¬ 
sono assumere valori tali costanti, dipende dalla rappresentazione interna 
dei numeri interi. Utilizzando 16 bit si possono specificare, al massimo, 2 e- 
levato alla 16 combinazioni differenti; tante quanti sono i numeri tra —32768 
e +32767. 
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ESEMPIO: 

corretti sbagliati 

12 12.1 (non è intero) 

—128 —32769 (fuori range) 

0 32800 (fuori range) 

Le costanti non intere o in virgola mobile (floating point) possono essere 
di due tipi: semplice o doppia precisione (quest’ultima solo nel computer 
M20). 

Le costanti in semplice precisione possiedono al massimo 9 cifre signifi¬ 
cative nel COMMODORE e 5 nell’M20, e sono espresse in una delle seguenti 
forme: 

a) contengono il punto decimale 

12.3 

- 7,0011 
0.0 

b) sono maggiori di 32767 o minori di —32768 

32820 

100000 

-999999 

c) sono espresse in forma esponenziale. 

235E6 equivale a 2.35 x IO 8 

— 28E—7 equivale a —2.8 x IO -6 

La forma esponenziale é simile alla notazione scientifica, ove il termine 10 
è sostituito dalla lettera E. 

Il “range” di variabilità dell’esponente, dipende dal tipo di calcolatore e 
dal numero di bit che esso utilizza per rappresentarlo. Nei calcolatori COM¬ 
MODORE, l’esponente può variare tra —38 e +38. 

ESEMPIO: 

corretti sbagliati 

145.2 145,2 (la virgola) 

— 18.0E12 12E39 (troppo grande) 

256E—07 7E—51 (troppo piccolo) 


22 



Nel computer M20, oltre ai precedenti tipi di costanti numeriche, si posso¬ 
no definire le costanti in ‘doppia precisione' in cui ci sono 15 cifre significati-’ 
ve e l’esponente può variare tra —308 e +308. Per esprimere una costante in 
doppia precisione si utilizza la forma esponenziale sostituendo la lettera ‘D’ 
alla lettera ’E’: 

235.12D150 
125.123654025D—52 

Il massimo numero esprimibile in questa forma è 
1.797693131486231D+308. 

È inoltre possibile esprimere costanti in doppia precisione posponendo al 
numero il carattere '#’: 

125# 

32.1458# 


23 




CAPITOLO 2 


LE VARIABILI 


I nomi delle variabili BASIC nel COMMODORE possono avere una qual¬ 
siasi lunghezza, ma solo i primi due caratteri sono significativi (per esempio 
i nomi VERDE e VENDITE sono considerati uguali). Nei nomi si possono u- 
sare anche numeri, ma il primo carattere deve essere una lettera. 

ESEMPIO: 

Al 

TIPO$ 

AA23FG 

I nomi di variabili non possono essere nè contenere parole riservate, cioè 
tutti i comandi BASIC, le istruzioni, i nomi di funzione e di operatori funziona¬ 
li. 

A seconda della loro configurazione, i nomi di variabili rappresentano va¬ 
lori numerici interi o decimali, oppure stringhe di caratteri. I nomi di stringhe 
devono terminare con il simbolo $, i nomi di variabili numeriche intere devo¬ 
no terminare con %. 

ESEMPIO: 

NUM% numero intero 

SOMMA numero decimale 

MOLT numero decimale 

PAROLA$ stringa 

Sebbene negli esempi precedenti abbiamo usato nomi di variabili lunghi 
più di due caratteri, è preferibile definire variabili di non più di due caratteri, 
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per evitare errori dovuti all’uso di nomi diversi che, in realtà, si riferiscono al¬ 
la stessa variabile: le variabili Al 3 e Al 5 sono interpretate come un’unica 
variabile!! 

Nel Computer M20 i nomi delle variabili possono essere lunghi fino a 40 
caratteri, non possono essere parole riservate ma possono contenerle. Per 
esempio la parola “OR” é riservata (come vedremo in seguito): in entrambi i 
computer non é possibile utilizzare OR come variabile, e solo nell'M20 è 
possibile utilizzare la variabile ORA. 

Per definire variabili che conterranno valori in doppia precisione (solo 
M20), si deve aggiungere la desinenza #. 

Per assegnare un certo valore ad una variabile è sufficiente scrivere il 
simbolo = seguito dall’espressione desiderata, per esempio: 

Al =34.2 

A3$=“ESEMPIO” 

DF=12*3+56.2/88 

DF%=12 

HB=56 


Per controllare una certa assegnazione, si può operare nel seguente mo¬ 
do: si digita sulla tastiera l’istruzione di assegnamento (ricordando di preme¬ 
re il tasto ‘RETURN’ (nell’M20 è il tasto a forma di L rovesciata) alla fine del¬ 
l’espressione), poi si scrive il comando PRINT seguito dal nome della varia¬ 
bile e si batte nuovamente il tasto ‘RETURN’. Sullo schermo comparirà il va¬ 
lore attuale della variabile. 

ESEMPIO: 

DF$=“PROVA" ‘RETURN’ (a questo punto la variabile DF$ assu¬ 
me il valore PROVA) 

PRINT DF$‘RETURN’ (si visualizza la parola PROVA) 

la parola PRINT può essere sostituita dal simbolo '?'. Proviamo infatti a scri¬ 
vere: 


DF$=“CO.R.EL. F.” ‘RETURN’ 
? DF$ ‘RETURN’ 

si visualizzerà la sigla CO.R.EL. F. 
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Possiamo visualizzare anche variabili numeriche (ci si deve sempre ricor-* 
dare di premere il tasto ‘RETURN’ alla fine di ogni comando o di una istruzio¬ 
ne): 

AA=123.45 

BB%=12 

CC$=‘'STRINGA” 

DF=145 

? AA,BB%,CC$,DF,DF$ 

sul video compariranno su una stessa riga: 

123.45 12 STRINGA 145 CO.R.EL. F. 

Facciamo ora qualche esempio di assegnazione sbagliata. 

F%=100000 

La risposta a questa assegnazione è: 

? ILLEGAL QUANTITY ERROR nel COMMODORE 

OVERFLOW nell’M20 

I llegal quantity„naturalmente significa quantità illegale; overflow significa 
oltre misura: infatti F% è una variabile intera, che quindi non può contenere 
numeri maggiori di 32767 o minori di —32768. Si deve perciò scrivere 

F=100000 

in cui F è una variabile floating point. 

Altri esempi di assegnazioni non corrette: 


HH=“B” 

HH è numerica (corr.: HH$=“B") 

X=3 x IO 1 

si deve scrivere X=3E1 

J=1.5E50 

il numero è troppo grande 

1C=12.5 

il primo carattere del nome non è alfabetico (corr.: 
C1=12.5) 

A$=3 

A$ non è una var. numerica: (corr.: A$=“3" oppure 
A=3) 
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A$=A mancano gli apici: (corr.:A$=“A”) 

A=$="BUNNV” il carattere = non è alfanumerico (corr.: A3$=“BUN- 
NY”) 


ESERCIZIO 

1. trovare gli errori nelle seguenti assegnazioni: 

1) FF$=R3 

2) X%4=“ABC” 

3) FP=.25E-39 

4) 2H%=7 

5) J%=“FFF" 

6) HZ=27E40 

7) F7%=—40123 

8) EP%=43— 

9) MN$=44 

10) DN=2700E36 

11) SS%=—30.01 

12) $A=“TIPO” 
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CAPITOLO 3 


VARIABILI ARRAY (VETTORI E MATRICI) 


Un array è un gruppo (o tabella) di valori associati ad un unico nome. 0- 
gni elemento dell’array è individuato tramite il nome dell’array e il numero 
d’ordine dell’elemento, nell'array stesso. Per esempio si esamini l'array di 7 
elementi così composto: 

1: “LUN 

2: "MAR” 

3: "MER” 

4: "GIO” 

5: "VEN” 

6: “SAB” 

7: “DOM” 


Si denoti con GN$ l’intero array di 7 elementi: con GN$(6) ci si riferisce a 
"SAB". 

Gli array possono avere più dimensioni, per esempio la tabella pitagorica 
potrebbe essere memorizzata con l’array PT% a due dimensioni: 


1: 2: 3: 4: 5: 6: 


1 : 1 2 

2: 2 4 

3: 3 6 

4: 4 8 


3 4 5 6 

6 8 10 12 

9 12 15 18 

12 16 20 24 
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Ovviamente con PT%(4,3) ci si riferisce al numero intero 12. 

Si possono definire array di dimensioni maggiori a 2. 

Un esempio di array a quattro dimensioni può essere il seguente: 

T (C,G,M,0) 


con 

C = città della regione Friuli Venezia Giulia 
(1.4, 

G = giorno di un particolare mese dell’anno 
(1.31) 

M = mese 
(1 . 12 ) 

O = massima/minima 

( 1 . 2 ) 

e con l’array T si vuole indicare la temperatura massima e minima giornalie¬ 
ra. 


Se si fa l’assegnazione 

TS = 1 
UD = 2 
GO = 3 
PN = 4 

si possono registrare le varie temperature delle città del Friuli. 

Ad esempio scrivendo 

T(2,30,12,1) = 2 

si memorizza la temperatura massima della città di Udine, del giorno 30 di¬ 
cembre. 

Questo array occupa un’area di memoria pari a 2976=(4*31*12*2) campi. 
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CAPITOLO 4 


ESPRESSIONI ED OPERATORI 


Un'espressione è, in generale, una combinazione di dati numerici o strin¬ 
ghe, fatta per mezzo di operatori. Come caso particolare, una espressione 
può essere composta da una sola costante o da una variabile, oppure da una 
stringa. 

Gli operatori eseguono operazioni logico-matematiche sui dati. Nel BASIC 
sono previste quattro categorie di operatori. 

aritmetici 

relazionali 

logici 

funzionali 


OPERATORI ARITMETICI 

Gli operatori aritmetici sono (in ordine di priorità): 


operatore 

operazione 

esempio 

t 

esponenziazione 

XIY 

+,—unari (prefissi) 

afferm., neg. 

+ X, -X 

V 

molt., div. 

X*Y, X/Y 

+,—binari (infissi) 

somma, sottrazione 

X+Y, X-Y 


Per cambiare l'ordine nel quale vengono eseguite le operazioni, si usano 
le parentesi: le operazioni dentro le parentesi sono eseguite per prime. 
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ESEMPI: 


A=X+Y*2 
A=X—Y/Z 
A=X*(_Y) 
A=6*XI2+3*X—4 


corrisponde a 
corrisponde a 
corrisponde a 
corrisponde a 


A=Y+2Y 
A=X—(Y/Z) 
A=X(-Y) 
A=6X 2 +3X-4 


L’espressione valutata viene assegnata alla variabile a sinistra dell’ugua¬ 
le. 

Se durante la valutazione di una espressione avviene una divisione per 0, 
appare sul video l’espressione: “DIVISION BY ZERO ERROR”. Se avviene 
che il risultato di una espressione sia più grande del massimo possibile, sul 
video appare: “OVERFLOW ERROR”. 


ESEMPIO 

1. scriviamo in termini BASIC l’area del triangolo e del trapezio: 
TR=B*h/2 
AT=(B1 +B2)*h/2 

Nell’M20, oltre agli operatori precedenti, sono disponibili anche i se¬ 
guenti: 

\ divisione intera 

MOD modulo 

In entrambi i casi gli operandi sono approssimati all'Intero più vicino. 
Nella divisione intera il risultato è troncato all’intero; nell'operazione di 
modulo il risultato è il resto ottenuto con una divisione intera. 

La priorità di questi operatori è compresa tra gli operatori *,/ e gli o- 
peratori +,— binari. 

ESEMPIO 

10 \ 4 = 2 (divisione intera) 

9 MOD 4 =1 (op. modulo) 


ESERCIZIO 
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2. scrivere in termini BASIC le espressioni risolutive dei seguenti 
problemi: 



1 ) 


volume della sfera: VS = 4^-R 3 


2) montante: MT=100000 [ 1 + * 

100 


B+VB2-4AC 

3) radici di un equazione di secondo grado: x =-- 


4) volume del cono: VC = 


7tR 2 H 


5) imponibile: IM = 


TM 


1 + 


6) I.V.A.: IV =TM 


100 
1 - TM 


1 + 


100 


7) freccia di una trave rettangolare incastrata ad un estremo: 

PL? 


F = 


3E (l? 


OPERATORI RELAZIONALI 

Gli operatori relazionali sono usati per confrontare due valori. Il risultato 
del confronto può essere “TRUE” o “FALSE”, (rispettivamente VERO o FAL¬ 
SO). La codifica interna del valore TRUE son due bytes di T (che corrispon¬ 
de al valore —1 espresso in una opportuna codifica interna); analogamente 
la codifica del FALSE sono due bytes di ‘0’ (corrispondente al valore 0). 
Questi operatori relazionali sono principalmente usati nella istruzione IF che 


si vedrà in seguito. 


operatori 

test 

= 

uguaglianza 

< > 

disuguaglianza 

< 

minore a 

> 

maggiore a 

< = 

minore o uguale a 

> = 

maggiore o uguale a 
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(NB: Il segno = è usato anche per assegnare un valore ad una variabile). 
Quando operatori aritmetici e relazionali sono combinati in una espressio¬ 
ne, gli aritmetici sono sempre eseguiti per primi: 

X+Y<(T—1)/Z 

è vera se X+Y è minore di T—1 diviso per Z. 


Un’espressione relazionale può essere assegnata ad una variabile nume¬ 
rica, e il risultato sarà il valore 0 se l’espressione è falsa, il valore —1 se inve¬ 
ce è vera. 

ESEMPIO: 

VL=5<8, dopo questo assegnamento la variabile VL contiene il nume¬ 
ro -1. 


ESERCIZIO 

3. nell’ipotesi in cui A=5 e B=3 determinare il valore della variabile 
VL nei seguenti casi: 

1) VL=A<B 

2) VL=B=A 

3) VL=B< >A 

4) VL=3 

5) VL=(B<=A) 

6) VL=(A<A+B) 


OPERATORI LOGICI 

Gli operatori logici permettono test su relazioni multiple, manipolazioni di 
bit, operazioni Booleane. Questi operatori ritornano un valore che è TRUE 
(vero:—1) o FALSE (falso:0). In una espressione, gli operatori logici sono e- 
seguiti dopo gli operatori aritmetici e relazionali. Gli operatori logici sono ap¬ 
plicabili sia ad espressioni aritmetiche che relazionali. Il risultato di una ope¬ 
razione logica è determinato come mostrato in seguito; X ed Y sono due e- 
spressioni di qualunque genere e gli operatori sono descritti in ordine di prio¬ 
rità decrescente: 
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NOT: 


X 


NOT X 


falso 

vero 


vero 

falso 


(cioè se l'espressione X 

è vera, 

NOT X è falsa, e viceversa) 

AND: X 

Y 

X AND Y 

falso 

falso 

falso 

falso 

vero 

falso 

vero 

falso 

falso 

vero 

vero 

vero 

(cioè X AND Y è vera soltanto se sia X che Y sono veri) 

OR: X 

Y 

X OR Y 

falso 

falso 

falso 

falso 

vero 

vero 

vero 

falso 

vero 

vero 

vero 

vero 

(cioè X OR Y è vera se 

almeno 

uno tra X e Y sono veri). 


Analogamente agli operatori relazionali, gli operatori logici possono esse¬ 
re usati per operare decisioni riguardanti il flusso del programma. In genere 
essi sono usati per connettere due o più relazioni. 

ESEMPIO: 

D<200 AND f<4 

è vera solo se entrambe le relazioni sono vere 
D<200 OR F<4 

è vera se almeno una relazione è vera 

NOT K<=0 
è vera solo se K>0. 
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ESEMPIO 


2. sia A=0 e B=—1: 


VL=A AND B dà come risultato VL=0 

VL=A OR B dà come risultato VL=—1 

VL=NOT A dà come risultato VL=—1 

VL=NOT B dà come risultato VL=0 

VL=A OR B ÀND NOT B dà come risultato VL=0 

quest’ultima è equivalente a VL= A OR (B AND (not b) ) 

Nell’M20, sono disponibili altri tre operatori logici, di priorità inferiore a 
OR: 


XOR: 

X 

Y 

X XOR Y 


falso 

falso 

falso 


falso 

vero 

vero 


vero 

falso 

vero 


vero 

vero 

falso 

(cioè X XOR Y 

è vera 

soltanto se X 

e Y hanno valori diversi) 

EQV: 

X 

Y 

X EQV Y 


falso 

falso 

vero 


falso 

vero 

falso 


vero 

falso 

falso 


vero 

vero 

vero 

(cioè X XOR Y 

è vera 

soltanto se X 

e Y hanno valori uguali). 

IMP: 

X 

Y 

X IMP Y 


falso 

falso 

vero 


falso 

vero 

falso 


vero 

falso 

vero 


vero 

vero 

vero 

(cioè X IMP Y 

è falsa 

soltanto se X 

è falso e Y è vero). 
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esercizio 


4. sia A=0, BoO, C=0, D<>0, determinare il valore della variabile 
VL dopo le seguenti assegnazioni: 

1) VL=C OR D 

2) VL=A AND D 

3) VL=NOT D 

4) VL=A AND B OR D 

5) VL=NOT (A AND B) AND NOT (B OR C) 

6) VL=A OR B AND C OR D 

7) VL=(5<4) OR (7<3) 

8) VL=( (5<4) OR (7>3) ) AND (4>2) 

9) VL=NOT (7+2>8 AND 5>7*(-1)) 

10) VL=(3>5 OR 6<9) AND NOT (2>8) 

OPERATORI FUNZIONALI 

Un operatore funzionale è usato in una espressione, per richiamare una 
operazione predefinita, che viene eseguita su un operando. Il 
COMMODORE-BASIC ha alcune funzioni intrinseche residenti nel sistema, 
come SOR (radice quadrata), SIN (funzione seno), ecc. Altre funzioni, di in¬ 
teresse particolare, possono essere definite, come vedremo in seguito, dal 
programmatore, a seconda delle necessità di calcolo. 
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CAPITOLO 5 


MODI DI OPERAZIONE DEL BASIC 


Nel “modo diretto”, i comandi e le istruzioni BASIC, non sono preceduti 
dai numeri di linea (etichette associate ad ogni linea di istruzione), e sono e- 
seguiti immediatamente. I risultati di operazioni logiche e aritmetiche posso¬ 
no essere visualizzati ed immagazzinati per un ulteriore uso. Questo modo è 
usato essenzialmente per sfruttare l'elaboratore come calcolatore da tavolo, 
cioè per ottenere veloci calcoli che non richiedono programmi, e per il “de¬ 
bugging”. 

Il debugging è un lavoro di tipo “investigativo” che serve a correggere er¬ 
rori nascosti nel programma. A volte infatti, può capitare che, corretti gli er¬ 
rori grammaticalli (scorrettezze nella forma delle istruzioni), il programma 
vada in esecuzione, ma non dia risultati esatti. Gli errori presenti sono da ri¬ 
cercare nella costruzione logica del programma. In generale gli errori logici 
sono difficili da scoprire, e richiedono un ripasso accurato dell’effettivo lavo¬ 
ro svolto da ogni singola istruzione (o da gruppi di istruzioni) e dal flusso ef¬ 
fettivo del programma. 

Un esempio: si provi a digitare sul computer la seguente espressione: 

PRINT 6*8-2 

e si premi il tasto ‘RETURN’. L’elaboratore calcola l’espressione e visualizza 
il risultato; sul video compare: 

46 

READY. 

e la macchina si predispone ad eseguire altri comandi. 

Il “modo indiretto” è usato per introdurre programmi. Ogni linea di pro- 
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gramma è preceduta da un numero, ed è memorizzata all’interno del calco¬ 
latore, in maniera sequenziale. Il programma è poi eseguito digitando il co¬ 
mando RUN. 

FORMATO DI LINEA 

nnnnn /istruzione BASIC/ (* l/istruzione BASIC/ *)...‘RETURN’ 

Se si definiscono su una stessa linea (che può essere lunga al massimo 
80 caratteri nel COMMODORE, e 256 nell'M20), più istruzioni BASIC, queste 
devono essere disgiunte da Il simbolo ‘RETURN’ indica il tasto RETURN. 

D’ora in avanti, per la definizione della sintassi delle istruzioni varranno le 
seguenti regole: 

1. le parole in maiuscolo devono essere digitate come mostrato 

2. le parole fra le barre inclinate//devono essere sostituite dal programma¬ 
tore 

3. ciò che appare fra (* e *) è opzionale 

4. tutta la punteggiatura, eccetto (* *) / deve essere digitata come mostrato 

5. i tre puntini ... indicano la possibilità di ripetizione 

6. il punto esclamativo ! indica espressioni mutualmente esclusive (bisogna 
sceglierne una). 


NUMERI DI LINEA 

Ogni linea di programma BASIC inizia con un numero di linea. I numeri di 
linea indicano l’ordine con cui le linee di programma vengono memorizzate 
(e quindi eseguite). Essi devono appartenere al range 0, 63999 per il COM¬ 
MODORE e al range 0, 65529 per l’M20. 

ESEMPIO 

3. A questo punto proviamo a scrivere e ad eseguire un programma 
(valido per entrambe le macchine), che calcola una semplice espres¬ 
sione matematica: 

R=B 2 — 4AC 
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Il programma deve quindi assegnare dei valori alle variabili A, B, C, 
calcolare l’espressione ed assegnare il risultato a R. Inoltre faremo vi¬ 
sualizzare sul video il valore di R. Il programma è: 

10 REM PROG1.1 :CALCOLO DI UNA ESPRESSIONE 
20 A=3 
30 B=4 

40 C=5 

50 R=BT2 - 4*A*C 
60 PRINT “R=”R 

L'istruzione etichettata da 10 è un commento. Le istruzioni etichettate 
dai numeri 20,30,40, assegnano alle variabili a sinistra del simbolo '=’, 
i numeri specificati a destra. 

L’istruzione 50 calcola l’espressione ed assegna ad R il risultato. L’i¬ 
struzione 60 stampa la stringa “R=” ed accanto a questa, il valore at¬ 
tuale di R. (Tutte le istruzioni utilizzate saranno dettagliatamente spie¬ 
gate nel seguito). 

Le istruzioni 20, 30, 40, possono essere raccolte in un’unica linea di 
programma, separandole con il simbolo 

10 REM PROG1.1 BIS:CALCOLO DI UNA ESPRESSIONE 
20 A=3:B=4:C=5 

30 R=BT2—4*A*C 
40 PRINT’’R=”R 

Per eseguire il programma operiamo come segue. 

Digitiamo il comando NEW, che cancella la memoria: questo comando 
è solitamente usato quando si vuole introdurre un nuovo programma 
da tastiera. 

Scriviamo ora il programma, facendo attenzione alla sequenzialità del¬ 
le istruzioni ed alla loro correttezza formale. Se durante la digitazione 
viene introdotto un carattere sbagliato, lo si può cancellare usando il 
tasto ‘DEL’, e riscrivendo il carattere desiderato. 

Sull’M20 un carattere sbagliato viene cancellato premendo i tasti “control” H. 

Introdotto il programma, si digiti il comando RUN per l’esecuzione. Il 
risultato deve essere: 

R=—44 

La sintassi completa dei comandi RUN e NEW sarà vista nei prossimi 
capitoli. 
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CAPITOLO 6 


I COMANDI BASIC NEW, RUN, LIST 


comando NEW 
NEW 

È usato per cancellare il programma e tutte le variabili in memoria. 
Questo comando è digitato nel modo diretto, prima dell’introduzione di un 
nuovo programma. 

La forma è identica per entrambi i computer. 


comando RUN 

COMMODORE: RUN (* /numero di linea/ *) 

Esegue il programma in memoria. Se è specificato il numero di linea (che 
è opzionale), l’esecuzione inizia da quella linea; altrimenti l’esecuzione inizia 
dalla linea con il numero più basso. 


M20: RUN (* /num. linea/!/nome programma/ (* ,R *) *) 

Se si utilizza la forma RUN oppure RUN /num. linea/ la funzione del co¬ 
mando è identica al COMMODORE. Se si specifica RUN /nome.programma/ 
l’M20 carica dal disco il programma specificato da /nome programma/ e lo 
mette in esecuzione. Se inoltre si aggiunge la desinenza ’,R’ (che può essere 
utilizzata solo con quest’ultima forma di RUN), i files (archivi dati su disco) 
eventualmente aperti da programmi eseguiti precedentemente, non verran¬ 
no chiusi. 
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ESEMPIO 


4. consideriamo il seguente programma (valido per entrambe le 
macchine): 

10 A=1000 

20 PRINT"A=”A 
30 B=2000 

40 PRINT“B=”B 

Se lo eseguiamo con RUN, sullo schermo compare: 

A=1000 

B=2000 

Se lo eseguissimo invece con RUN 30, comparirebbe la scritta: 
B=2000 

in quanto non verrebbero eseguite le prime due istruzioni. 

Se sull’M20 scriviamo: 

RUN “1:prova" 

il programma ‘prova’ residente sul drive 1, è caricato in memoria e 
quindi messo in esecuzione. 


comando LIST 

Questo comando esiste in due formati per il COMMODORE: 

LIST (* /numero di linea/ *) 

LIST (* /numero di linea/ *) — (* /numero di linea/ *) 

Serve per visualizzare tutte o parte delle istruzioni del programma attual¬ 
mente in memoria. 

Nel primo formato, se è omesso il numero di linea, il programma è listato 
completamente. Per interrompere lo scorrimento delle linee di programma si 
prema il tasto ‘STOP’ (‘Control’ C sull’M20). Se è incluso anche il numero di 
linea, viene visualizzata solo la linea specificata. 
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Nel secondo formato sono presenti le seguenti opzioni: 


a) se è specificato solo il primo numero, la lista comprende le linee da 
quel numero in poi. 

b) se è specificato solo il secondo numero, la lista comprende le linee 
dall'inizio fino a quel numero. 

c) se sono specificati entrambi, la lista comprende il range tra i due 
numeri. 


ESEMPIO 

5. consideriamo il programma PROG1.1 dell’esempio 3. 

LIST :visualizza il programma in memoria 
LIST 50:visualizza la linea 50 
LIST 30—:tutte le linee da 30 alla fine 
LIST —40:dall’inizio a 40 
LIST 20-50:da 20 a 50 

Nell’M20 sono presenti tutte le precedenti possibilità inoltre esistono i 
formati: 

LIST . 

LIST .— /num. linea/ 

Queste istruzioni visualizzano l’istruzione corrente o l’intervallo di i- 
struzioni comprese tra l’istruzione corrente e quella specificata con 
/num. linea/. 

Sul computer COMMODORE, il comando LIST sta alla base del servi¬ 
zio di “editing”, che consente di effettuare in modo agevole, aggiorna¬ 
menti e correzioni sui programmi. 

Visualizzato il programma infatti, o parte di esso, è possibile tramite la 
tastiera aggiungere, cancellare o modificare le istruzioni con le moda¬ 
lità che ora vedremo. 

Per cancellare una linea di istruzione è sufficiente scrivere il numero di 
linea e premere ‘RETURN’. 

Per cancellare un carattere si deve portare il cursore (tramite i tasti 
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spostamento cursore descritti in seguito), sul carattere successivo e 
premere il tasto ‘DEL’. 

Per aggiungere un carattere si deve portare il cursore sul carattere se¬ 
guente la posizione di inserzione e premere il tasto ‘(shift)INST’ (cioè 
contemporaneamente i tasti ‘SHIFT’ e ‘INST’); si noterà uno sposta¬ 
mento di tutti i caratteri a destra del cursore e l’introduzione di uno 
spazio bianco: si può quindi scrivere il carattere desiderato. 

ESEMPIO 

6. supponiamo dì aver digitato la parola PI NT anziché PRINT. 

Vogliamo inserire una R fra la P e la I. Si posizioni il cursore (tramite i 
tasti di spostamento cursore) sulla seconda I e si prema ‘(shift)INST’: 
si ottiene 

P INT 

con il cursore sulla posizione vuota: ora premiamo il tasto ‘R’ e si avrà: 
PRINT 

Per modificare un carattere basta posizionare il cursore sopra di esso 
e scrivere il nuovo carattere. 

Si faccia attenzione che corretta la visualizzazione della linea di pro¬ 
gramma, si deve premere il tasto RETURN affinchè le modifiche ven¬ 
gano riportate sul programma stesso. 

Alcuni tasti sulla tastiera del PET, facilitano il posizionamento del cur¬ 
sore sul carattere desiderato: essi sono i tasti di spostamento cursore 
(a destra, a sinistra, in alto, in basso), e il tasto ‘HOME’ che posiziona 
il cursore in alto a sinistra. 

editing sull’M20 

Sul computer M20 il servizio di editing è un po’ più disagevole e comples¬ 
so, comunque sufficientemente ricco di possibilità di correzione. 

Innanzi tutto si deve entrare in ambiente di EDIT per la linea di program¬ 
ma che si intende modificare, scrivendo: 

EDIT /num. linea/ 

oppure: 

EDIT . 
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Questo comando permette di entrare in ambiente di edit per la riga speci¬ 
ficata da /num. linea/ (primo caso) o per la linea di programma attualmente 
considerata dalla macchina (secondo caso). 

Entrata in edit. la macchina visualizza il numero di linea dell’istruzione 
specificata ed attende la selezione del tipo di correzióne che si intende effet¬ 
tuare. Nella seguente tabella sono riportati i comandi di edit: 

L (lista): visualizza lo stato corrente dell’istruzione e si riposiziona all’inizio 
della linea. 

A (again): annulla tutte le eventuali modifiche già effettuate e si riposiziona 
in testa alla linea. 

SPAZIATORE: visualizza il successivo carattere e sposta il cursore a destra 
di una posizione. 

CTRL H: cancella l’ultimo carattere e sposta il cursore di una posizione a si¬ 
nistra. 

I (insert): entra nello stato di inserimento: tutti i caratteri successivamente 
digitati saranno inseriti nell'Istruzione a partire dalla posizione corrente 
del cursore. Per uscire dallo stato di inserimento si deve digitare CTRL 
HOME. 

X (extended line): provoca la visualizzazione della linea e l’attivazione dello 
stato di inserimento alla fine di essa. 

CTRL HOME: esce dallo stato di inserimento, ma resta nel modo di edit, per 
ulteriori variazioni. 

D (delete): cancella il carattere successivo alla posizione del cursore; i ca¬ 
ratteri cancellati sono visualizzati fra una coppia di ’/’. 

n D (delete n characters): cancella n caratteri; n è un numero. 

H (hack): cancella la parte rimanente della linea ed entra nello stato di inse¬ 
rimento. 

S x (search for thè Ist occurence): ricerca la prima occorrenza del caratte¬ 
re specificato a destra di S; il cursore si posiziona a sinistra di esso. Se 
non esiste tale carattere, il cursore si posiziona alla fine della linea. 

n S x: ricerca l’ennesima occorrenza del carattere specificato. 

D x (search and kill): cancella tutti i caratteri compresi fra la posizione del 
cursore e la prima occorrenza del carattere specificato. 
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n K x: cancella tutti i caratteri compresi fra la posizione del cursore e l'enne¬ 
sima occorrenza del carattere specificato. 

C x (change): rimpiazza il carattere successivo alla posizione del cursore, 
con il carattere specificato. 

n C xl x2 ... xn (change n characters): rimpiazza n caratteri. 

RETURN: visualizza la linea con le modifiche apportate e ritorna al modo 
BASIC. 

E (exit): ha lo stesso effetto di RETURN, ma la parte rimanente della linea 
non è visualizzata. 

Q (quite): ritorna al modo BASIC annullando tutte le modifiche apportate alla 
linea di istruzione. 
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CAPITOLO 7 


ISTRUZIONI BASIC 


istruzione REM 

REM (* /commento/ *) 

Permette di inserire commenti ali’interno di un programma. 

L'istruzione REM non è eseguita, ma è stampata così come è introdotta, 
quando si stampa il listing del programma. 

Non si possono inserire altre istruzioni sulla stessa riga dopo un commen¬ 
to, in quanto il simbolo separatore è considerato commento. 

Questa istruzione ha la stessa forma per entrambe le macchine. 

Nell'M20 c’è inoltre la possibilità di definire un ‘campo di commento' utiliz¬ 
zando la seguente forma: 

(* /commento/ *) 

L'apostrofo ha lo stesso significato di REM, ma può essere scritto su una 
stessa linea di istruzione senza dover inserire il simbolo di separazione. 


istruzione LET 

(* LET *) /variabile/=/espressione/ 

Assegna alla variabile a sinistra dell’uguale, il valore dell’espressione. 
Notare che la parola LET è opzionale, e quindi il simbolo '=’ è sufficiente 
per eseguire l’assegnazione. Questa istruzione è identica per entrambe le 
macchine. 
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ESEMPI: 

LET D=12 è lo stesso che D=12 

LET A=5*D—1 è lo stesso che A=5*D—1 

LET B=3*(4—A)/D è lo stesso che B=3*(4—A)/D 

istruzione INPUT 

COMMODORE: INPUT (* “/stringa di suggerimento/”; *) 

/ lista di variabili/ 

con /lista di variabili/ descritta da: 

/variabile/ (*, /variabile/ /variabile/ *) 

Questa istruzione permette l’ingresso dei dati da tastiera durante l’esecu¬ 
zione del programma. 

Quando si esegue una istruzione di INPUT, il programma si interrompe e 
visualizza un punto interrogativo ad indicare che è in attesa di dati. Se è in¬ 
clusa la stringa di suggerimento, essa è stampata prima del punto interroga¬ 
tivo. 

La richiesta di dati va soddisfatta da tastiera. 

I dati introdotti sono assegnati, nell’ordine, alla lista delle variabili: il nu¬ 
mero dei dati introdotti (separati da virgola), deve essere lo stesso che il nu¬ 
mero delle variabili nella lista. L’INPUT è limitato alla lunghezza di una linea¬ 
video. 

Le variabili nella lista di INPUT possono essere sia numeriche che strin¬ 
ghe, naturalmente la serie di dati introdotti deve essere concorde con i tipi di 
dati specificati dalle variabili. Rispondendo all’INPUT con tipi sbagliati di va¬ 
lori, si ha il messaggio: 

? REDO FROM START 

Non viene fatto nessun assegnamento finché non vengono forniti dati ac¬ 
cettabili. 

Rispondendo all’INPUT con troppi dati, si ha il messaggio: 

? EXTRA IGNORED 

ad indicare che i dati in più sono ignorati. 

Con troppo pochi dati si ha: 

?? 
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a d indicare la necessità di soddisfare anche le rimanenti variabili. 

M20: INPUT (* ; *) (* “/stringa di suggerimento/” *) 

; ! , /lista di variabili/ 

Il significato dell’istruzione è simile al COMMODORE, con alcune differen¬ 
ze: 

se viene specificato il carattere prima della stringa di suggerimento, non 
viene cancellato tutto ciò che segue i dati digitati; 

se al posto del seguente la stringa di suggerimento si specifica il carattere 
7 , si sopprime il simbolo ’?’ sul video. 

se i dati digitati alla richiesta di una INPUT non coincidono con il numero o il 
tipo delle variabili specificate, l’M20 emette il messaggio: 

?Redo from start 

ed è necessario reintrodurre tutti dati. 

ESEMPI 

7. riprendiamo l’esempio del programma PROG1.1, utilizzando l’i¬ 
struzione INPUT per assegnare valori alle variabili: 

10 REM PROG1.1TER:CALCOLO DI UNA ESPRESSIONE 
20 INPUT A,B,C 
30 R=B 2—4*A*C 
40 PRINT“R=”R 

l’esecuzione del programma provoca la stampa di un punto interrogati¬ 
vo, al quale si deve rispondere con una terna di numeri separati dalla 
virgola (per esempio 3,4,5); fatto ciò l’esecuzione procede come nel¬ 
l'esempio precedente. 

8 . in questo esempio calcoliamo il quadrato del numero introdotto: 

10 REM PROG1.2 
20 INPUT X 

30 PRINT X“AL QUADRATO É”XI2 

40 END 

RUN 

? 5 (il numero 5 è digitato e seguito da ‘RETURN’) 

5 AL QUADRATO É 25 
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9. in questo esempio calcoliamo l’area del cerchio: come INPUT è ri¬ 
chiesto il raggio 

5 REM PROG1,3:AREA DEL CERCHIO 
10 PI =3.1415 

20 INPUT “QUALE É IL RAGGIO”;R 
30 A=PI*RI2 

40 PRINT “L’AREA DEL CERCHIO É”;A 
RUN 

QUALE É IL RAGGIO? 7.4 (digitare il num. 7.4) 

L’AREA DEL CERCHIO É 172.0336 


ESERCIZI 

5. scrivere un programma che calcoli la media aritemetica di tre nu¬ 
meri introdotti da tastiera e visualizzi il risultato sul video. 

6 . scrivere un programma che risolva il seguente problema: sia data 
una vasca di 100 litri inizialmente riempita a metà, con due rubinetti di 
portate fisse introdotta da tastiera. Si calcoli il tempo in cui la vasca si 
riempie. 

M20: LINE INPUT. 

Questo comando è disponibile solo sul computer M20. É simile all'i¬ 
struzione INPUT, ma permette di introdurre tutti i caratteri speciali (, ; 
. ecc.), fino al primo ‘RETURN’. 


istruzione GET 

COMMODORE: GET /variabile/ 

Questa istruzione permette l’introduzione di un singolo carattere da tastie¬ 
ra. 

Il carattere viene letto in un’area di memoria riservata alle funzioni di ta¬ 
stiera (‘buffer’ di tastiera); se non viene premuto alcun tasto alla variabile 
non viene assegnato alcun valore se è alfanumerica, o viene assegnato il nu¬ 
mero ‘0’ se è numerica; se viene premuto un tasto il carattere digitato viene 
assegnato alla variabile specificata. 

La ricerca del carattere sul buffer della tastiera è velocissima e questo 
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non permette in generale la digitazione in tempo utile del tasto. Per questo 
motivo l’istruzione GET è solitamente usata nel ciclo seguente (che fa uso 
dell'istruzione IF...THEN, specificata in seguito): 

100 A$=“" 

110 GET A$: IF A$=“” THEN GOTO 110 

Nell’istruzione 100 viene annullato l’eventuale contenuto di a*; nell’istru¬ 
zione 110 viene esaminato il buffer della tastiera finché non viene trovato un 
carattere, ovvero finché non viene premuto un tasto. 

Come esempio scriviamo un programma che usi l’istruzione GET per l’in¬ 
troduzione caratteri ed ogni carattere viene visualizzato: 

10 A$=“” 

20 GET A$: IF A$=“” THEN GOTO 20 

30 PRINT A$; 

40 RUN 

M20: INKEY$ 

In questo computer il significato del comando COMMODORE-GET è as¬ 
sunto dalla parola INKEY. Il tipico formato di questa istruzione è: 

/variabile/=INKEY$ 

Il funzionamento è del tutto simile al comando COMMODORE-GET. 


istruzioni DATA, READ, RESTORE 
DATA /lista di costanti/ 

con /lista di costanti/ descritta da /costante/ (* /costante/,...,/costante/ *) 

READ /lista di variabili/ 

con /lista di variabili/ descritta da /variabile/ (*, /variabile/,...,/variabile/ *) 

RESTORE 

(Valido per entrambe le macchine). 

Le istruzioni DATA memorizzano costanti (stringhe e numeri), che sono 
lette da istruzioni READ. 

Una istruzione DATA non è eseguibile, e può contenere tante costanti 
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quante possono essere scritte su un'unica linea (separate da virgola). Si 
possono usare un qualsiasi numero di istruzioni DATA. 

Le istruzioni READ accedono alle costanti di DATA, nell'ordine sia di nu¬ 
mero di linea che di posizione. 

La lista di costanti può contenere costanti di ogni tipo e formato, ma non 
sono permesse espressioni. 

I tipi delle variabili nelle istruzioni READ devono corrispondere ai dati del¬ 
le istruzioni DATA. 

II blocco dati definito dall'insieme delle istruzioni DATA può essere riletto, 
con istruzioni READ, purché queste vengano precedute dall'istruzione RE- 
STORE. 

Questa istruzione ha come effetto l’azzeramento dell’apposito puntatore 
ai dati specificati dalle istruzioni DATA. 

ESEMPI: 

80 READ A(1 ),A(2),A(3),A(4),A(5) 

110 DATA 1.2,12.5,3,4.7,9.0 

assegna le costanti di DATA all’array A. 

40 READ A.B.C 
50 READ P$,Q$ 

60 READ D1.D2.D3 


210 DATA 3,-2,11,“AB” 

220 DATA “CD”,-8,0,10 

Se vengono fatti dei tentativi di lettura tramite READ, senza corrispondenti 
istruzioni DATA, si visualizza il messaggio: 

OUT OF DATA ERROR IN /numero di linea/ 

dove il /numero di linea/ è quello relativo all’istruzione READ che ha provo¬ 
cato l’errore. 

ESERCIZIO 

7. inserire in una istruzione DATA i nomi dei mesi e costruire un pro¬ 
gramma che prelevi questi nomi e li visualizzi sul video. 
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istruzione PRINT 

PRINT /lista di espressioni/ 

con /lista di espressioni/descritta da: /espr/ (* /sep//espr/.../sep//espr/*) 

dove /espr/ è una espressione numerica o alfanumerica e /sep/ è un separa¬ 
tore ( , ; ‘SPAZIATURA’ ) 

(Valido per entrambe le macchine). 

Permette la visualizzazione di dati su video. 

Se la lista di espressioni è omessa, viene stampata una riga vuota. Se in¬ 
vece è inclusa, i valori delle espresioni sono visualizzati sul video. Le espres¬ 
sioni possono essere numeriche o stringhe. Le stringhe devono essere inclu¬ 
se tra virgolette. 

Le posizioni della stampa di ogni termine delia lista, dipende dalla punteg¬ 
giatura usata per la separazione, li BASIC divide la linea di stampa in 10 zo¬ 
ne: nella lista di espressioni la virgola causa la stampa del valore considera¬ 
to nella zona successiva; il simbolo causa la stampa del valore nella posi¬ 
zione immediatamente dopo il valore precedente. 

Se l’ultimo termine della lista è seguito da o da la successiva istru¬ 
zione PRINT continua sulla stessa linea. Se la stampa supera la lunghezza 
massima della linea di video, la stampa stessa continua sulla linea successi¬ 
va. 

Al posto della parola PRINT si può usare il simbolo ’?’. 


ESEMPI: 


10 X=5 

20 PRINT X—4,X+4,X*3 
RUN 

1 9 15 

E possibile inserire nelle stringhe di stampa anche i movimenti del cursore 
e la cancellazione dello schermo. 


ESEMPIO 

10 . come esempio disegnamo un quadrato di asterischi: 
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10 REM QUADRATO 
20 KK$--“* ****** ****•" 

30 PRINT "f Mllir ;KK$ 


40 PRINT “Hi* *" 

50 PRINT “Ili* *” 

60 PRINT "Hi* *” 

70 PRINT "Hi* *” 


80 PRINT “|IÌ” ;KK$ 

ESERCIZI 

8 . visualizzare al centro del video il proprio nome. 

9. come l’esercizio 8, ma incorniciando il nome in un rettangolo. 

M20: WRITE (* /espressione/ *) (* ./espressione/ *) 

Questa istruzione è disponibile solo sull’M20. Visualizza i dati risul¬ 
tati delle espressioni. Le espressioni possono essere di qualsiasi tipo 
(numeriche, logiche, relazionali, stringhe). Ogni espressione deve es¬ 
sere separata da virgola. I numeri vengono visualizzati con lo stesso 
formato dell'istruzione PRINT, ma non sono seguiti da spazi. Se è o- 
messa la parte /espressione/ viene visualizzata una linea bianca. 

ESEMPI: 


A=52:B=21.5:C=13 
WRITE A,B,C 

52, 21.5, 13 

istruzione GOTO 

GOTO /numero di linea/ 

(Valido per entrambe le macchine). 

Esegue un salto incondizionato ad uno specifico numero di linea. Se il nu¬ 
mero di linea è una istruzione eseguibile il programma prosegue da quella li¬ 
nea, altrimenti dalla prima istruzione eseguibile seguente il numero di linea 
specificato. 

Questa istruzione permette di saltare ovunque nel programma. Una buona 
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programmazione consiglia comunque di utilizzare il GOTO molto limitata- 
mente e di saltare solo poche istruzioni. Un uso sconsiderato del GOTO in¬ 
fatti, porterebbe caoticità alla sequenzialità del programma, rendendolo di 
difficile lettura e correzione. 

ESEMPIO 

11. (NB: nel COMMODORE la variabile Tl$ è riservata ed è incre¬ 
mentata automaticamente dall'orologio interno del computer). 

10 REM OROLOGIO 
20 INPUT'CHE ORA É :HHMMSS”;TI$ 

30 PRINT “liiiiiiliil” ; 

40 PRINT “L’ ORA É: ”TI$; 

so print iiiiiniinmiiiih 

60 GOTO40 

alla domanda: CHE ORA É:HHMMSS?, si deve rispondere digitando 
l’ora nella forma richiesta, cioè due cifre per l'ora, due per i minuti e 
due per i secondi; per esempio se sono le 9.15 e 4 secondi, si scriverà: 
091504. 

Per interrompere il programma si dovrà premere il tasto STOP. 


istruzioni GOSUB, RETURN 
GOSUB /numero di linea/ 

RETURN 

(Valido per entrambe le macchine). 

Le due istruzioni permettono rispettivamente il salto a, e il ritorno da su- 
broutines (sottoprogrammi). 

Il /numero di linea/ è il primo numero di linea di una subroutine. L’istruzio¬ 
ne RETURN è l’ultima istruzione eseguita della subroutine. Provoca il salto di 
ritorno al programma chiamante, nel punto seguente alla chiamata. 

Una subroutine può contenere più di una istruzione di RETURN, disposte 
in differenti punti. 

Una subroutine può apparire ovunque nel programma, ma deve essere di¬ 
stinta da esso: per prevenire involontari ingressi ad una subroutine, questa 
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può essere preceduta da STOP, END, o da un GOTO che salta tutte le istru¬ 
zioni. 

Al massimo è permesso un annidamento di 23 subroutines. 

ESEMPIO 

12 . il seguente programma è un esempio di utilizzo delle istruzioni 
GOTO e GOSUB. 

10 REM 
20 PRINT '■#!” 

30 PRINT“DI AMETRO/LATO”; 

40 INPUT D:R=D/2 
50 GOSUB100 
60 GOSUB200 
70 PRINT 
80 PRINT“NUOVO 
90 GOTO30 

100 REM AREA CERCHIO 
110 A=R*R*3.14 

120 PRINT“L’AREA DEL CERCHIO É ”;A 
130 RETURN 

200 REM AREA QUADRATO 
210 B=D*D 

220 PRINT“L’AREA DEL QUADRATO É ”;B 
230 RETURN 

Per terminare questo programma e in generale per terminare un pro¬ 
gramma entrato in fase di INPUT dati, si deve digitare un 'RETURN' a 
vuoto (ovvero senza precedente digitazione di dato). 


ESERCIZIO 

10 . si determini la circonferenza del cerchio e il perimetro del qua¬ 
drato dell'esempio precedente, estendendolo anche al cerchio circo- 
scritto al quadrato. 

11 . si costruisca un programma che chiama una subroutine che cal¬ 
cola la media e lo scarto dalla media di una sequenza di dati richiesti 
da tastiera nel main. 
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12 . si costruisca un programma che chiama una subroutine che va¬ 
luta la percentuale di riempimento di una vasca, essendo richiesti da 
programma principale le quantità progressive inserite. 

istruzioni di SALTO CONDIZIONATO 

ON /espressione/ GOTO /lista di numeri di linea/ 

ON /espressione/ GOSUB /lista di numeri di linea/ 

con /lista di numeri di linea/ descritta da: /numero di linea/ (* ,/numero di li¬ 
nea/,...*) 

(Valido per entrambe le macchine). 

É utilizzata per saltare ad uno dei diversi numeri di linea a seconda del ri¬ 
sultato dell’espressione. 

Per esempio se il valore dell’espressione è 3, allora si salta al terzo nume¬ 
ro di linea specificato. 

I numeri di linea nel secondo formato devono essere i primi numeri di li¬ 
nea di subroutines. 

Se il valore dell’espressione è non intero, viene ignorata la parte decima¬ 
le. 

Se il valore è negativo, ci sarà l’errore: 

ILLEGAL QUANTITY ERROR 

Se il valore è 0, o maggiore dei termini della lista, il programma continua 
con l’istruzione seguente. Esempio: 

100 ON L—1 GOTO 150,300,320,390 
110 

se L—1=2 salta all’istruzione 300 
se L—1=5 salta all’istruzione 110 

ESEMPIO 

13. questo programma calcola l’area di un cerchio o l'area di un ret¬ 
tangolo o l’area di un trapezio a seconda del valore digitato da tastiera. 
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Inoltre a seconda del caso prescelto, chiede i particolari dati necessari 
a risolvere il problema. 

10 REM CERCHIO, RETTANGOLO, TRAPEZIO 
15 PRINT'V" 

20 PRI NT" &0 1 - CERCHIO—2=RETTANGOLO—3—TRAPEZIOQ” 
25 INPUT‘‘SCEGLIERE L’OPZIONE DESIDERATA" ;A 
30 PRINT" V" 

40 ON A GOTO 100,200,300 
50 GOTO20 

100 REM AREA CERCHIO 
110 INPUT“RAGGIO" ;R 
120 PRINT“AREA CERCHIO = ”3.14*R*R 
130 GOTO 20 

200 REM AREA RETTANGOLO 
210 INPUT"LATI DEL RETTANGOLO” ;L1,L2 
220 PRINT“AREA RETTANGOLO = ”L1*L2 
230 GOTO20 

300 REM AREA TRAPEZIO 

310 INPUT“BASE MAGGIORE” ;B1 

320 INPUT"BASE MINORE” ;B2 

330 INPUT"ALTEZZA” ;H 

340 PRINT"AREA TRAPEZIO”(B1+B2)*H/2 

350 GOTO20 

(NB. Se alla richiesta di dato nell’istruzione 20 si risponde digitando un 
numero negativo, il programma si interrompe). 


ESERCIZIO 

13. riscrivere il programma dell'esempio precedente utilizzando l’i¬ 
struzione ON...GOSUB al posto dell'istruzione ON...GOTO. 


istruzioni di TEST 

COMMODORE: IF /espressione/THEN /istruzioni/ ! /numero di linea/ 

con /istruzioni/ descritta da: /istruzione/ (* ^istruzione/ ... ^istruzio¬ 
ne/ *) 

IF /espressione/ GOTO /numero di linea/ 
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Queste istruzioni sono usate per prendere decisioni riguardanti il flusso di 
programma, in base al risultato di una espressione. 

Se il risultato è ‘vero’, allora la clausola THEN o GOTO è eseguita. La parte 
THEN può essere seguita o da un numero di linea o da una o più istruzioni 
(separate dal simbolo GOTO è sempre seguito da un numero di linea. 

Se il risultato è ‘falso’, le clausole THEN e GOTO sono ignorate, e l’esecu¬ 
zione continua dall’istruzione seguente l'IF. 

L’istruzione IF...THEN può essere annidata, e il numero di annidamenti è 
limitato solo dalla lunghezza della linea. 

ESEMPI: 

50 IF A=B THEN IF B=C THEN PRINT “A=C” 

40 INPUT M 

50 IF (M>10)AND(M<20) THEN PRINT“NEL RANGE”:GOTO 70 
60 PRINT"FUORI DEL RANGE” 

70 END 

M20: IF /espressione/THEN /istruzioni/ ! /numero di linea/ 

(* ELSE /istruzioni/ ! /numero di linea/ *) 

con /istruzioni/ descritta da: /istruzione/ (* ^istruzione/ ... ^istruzione/ *) 

IF /espressione/ GOTO /numero di linea/ (* ELSE/istruzioni/!/numero di li¬ 
nea/ *) 


Nell’M20, il comando IF... ha la stessa operatività del COMMODORE, con 
l'aggiunta opzionale della parte ELSE, che viene eseguita solamente se l’e¬ 
spressione condizionale risulta falsa. 

ESEMPIO 

14. calcolo del fattoriale di un numero. 

Il fattoriale è una funzione definita solo sui numeri interi maggiori o u- 
guali a zero, e per un dato n (numero intero) è uguale al prodotto di 
tutti gli interi positivi minori o uguali a n; per esempio: 

f att (6 ) =6*5 *4 *3 *2 *1 
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inoltre si pone: 


fatt(0)=1 

Scriviamo il programma, organizzato a sottoprogramma, che calcola il 
fattoriale di un numero. 


10 

REM PROG1.6-FATTORIALE 


20 

INPUT“DAMMI UN NUMERO”;N 


30 

IFN<0THENPRINT“ERRORE—IL NUMERO È 
VO”:GOTO80 

NEGATI- 

40 

IFN<>INT(N)THENPRINT“ERRORE—IL NUMERO NON È 
INTERO”: GOTO80 

45 

IFN >32THENPRINT”ERRORE—IL NUMERO È 
GRANDE":GOTO80 

TROPPO 

60 

IFP>1THENF=F*P:P=P—1 :GOTO60 


55 

IFN=0THENGOTO70 


60 

1 FP>1 THENF=F*P:P=P—1 :GOTO60 


70 

PRINT” IL FATTORIALE DI”;N;“ É”;F 


80 

RETURN 



La funzione INT usata nell’istruzione 40 restituisce il valore intero del 
numero passatole come parametro; per esempio INT(7.2) è uguale a 
7. 

Quindi N è diverso da INT(N) solamente quando N non è intero. 
L’istruzione 45 è stata introdotta in quanto se si tentasse di calcolare il 
fattoriale di un numero maggiore di 32 si provocherebbe un errore di 
OVERFLOW. 


ESEMPIO 

15. in questo programma leggiamo un certo insieme di dati memoriz¬ 
zati con istruzioni DATA e li visualizziamo sul video insieme alla loro 
somma, alla loro media, al massimo e al minimo. 

Il primo dato (istruzione 30) fornisce il numero di dati da leggere. 

I dati da leggere sono introdotti con le istruzioni 40 e 50. 

La visualizzazione dei dati avviene nella subroutine 1000-1020. 
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Il significato delle variabili usate è il seguente: 


N = numero dei dati da leggere 

T = somma dei dati 

I = contatore 

MI = minimo 

MA = massimo 

MD = media 

Al = variabile d’appoggio 


10 REM LETTURA DATI 
20 PRINT"H" 

30 DATA 10 

40 DATAI.2,52.32,21.5,40,12.12 
50 DATAI 0.23,16,18.5,1.1,10 
60 READ N 
70 1=1 

80 READ Al 
90 GOSUB1000 
100 MI=A1:MA=A1:T=A1 
110 IF I =N THEN200 
120 1 = 1+1 
130 READ Al 
140 GOSUB1000 
150 IF A1<MI THENMI=A1 
160 IF Al >MA THENMA=A1 
170 T=1 +A1 

180 GOTO110 
200 MD=T/N 
210 PRINT 

220 PRINT’’iLTOTALE É”T 
230 PRINT“LA MEDIA É”MD 
240 PRINT’ML MASSIMO É”MA 
250 PRINT“IL MINIMO É”MI 
260 END 

1000 REM VISUALIZZA DATO 
1010 PRINT“DATO”;l;“:”,A1 
1020 RETURN 
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ESEMPIO 


16. l’istruzione IF...THEN può essere usata anche per ordinare alfa¬ 
beticamente dati alfanumerici. 

Questo semplice programma richiede due dati alfanumerici da tastiera 
e li visualizza sul video in ordine alfabetico. 

10 INPUT A$ 

20 INPUT B$ 

30 IF A$>B$ THEN 100 
40 PRINT B$ 

50 PRINT A$ 

60 END 
100 PRINT A$ 

110 PRINT B$ 

120 END 

ESERCIZI 

14. scrivere un programma che acquisisca dei dati numerici interi da 
tastiera. Se il dato in ingresso è pari viene sommato sulla variabile P; 
se è dispari sulla variabile D. 

Quando viene digitato lo 0 vengono visualizzati i due parziali. Se il dato 
in ingresso è negativo o non intero viene ignorato. 

15. scrivere un programma che risolva una equazione di secondo 
grado visualizzando l’eventuale forma complessa del risultato. 

16. scrivere un programma che legga da tastiera 3 dati alfanumerici 
e li stampi ordinati alfabeticamente. 

(Per confrontare alfabeticamente due dati alfanumerici si possono u- 
sare gli stessi operatori relazionali usati per i confronti fra numeri. Per 
esempio se si desidera sapere quale fra le due variabili A$ e B$ prece¬ 
de l’altra secondo l’ordinamento alfabetico, è sufficiente testare l'e¬ 
spressione: 

A$ > B$ 

se il risultato è vero, A$ contiene una stringa alfabeticamente prece¬ 
dente a quella contenuta da B$. Se l’espressione è falsa A$ segue od è 
uguale a B$). 
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17. scrivere un programma che calcoli la radice quadrata (approssi¬ 
mata a meno dell’1%) di un numero senza l’utilizzo della funzione 
SQR. (La si calcoli per approssimazioni successive). 

Istruzione Iterativa 
FOR...STEP...NEXT 

FOR /variabile/=/espr.x/ TO /espr.y/ (* STEP /espr.z/ *) 


NEXT (* /variabile/ *) (* ./variabile/ *) 

Con questa istruzione, valida per entrambe le macchine, è possibile ese¬ 
guire in un ciclo un gruppo di istruzioni, /variabile/ è usata come contatore. 
L'espressione numerica /espr.x/ è il valore iniziale del contatore. L’espres¬ 
sione numerica /espr.y/ è il valore finale. 

Le linee di programma seguenti il FOR sono eseguite finché non è trovata 
una istruzione NEXT. A questo punto il contatore è incrementato del valore 
dell’espressione numerica /espr.z/, specificata da STEP. Se la parte STEP è 
assente, il contatore è incrementato automaticamente di 1. Il valore /espr.z/ 
può anche essere un numero non intero. Ci sarà poi un confronto per con¬ 
trollare se il valore attuale del contatore è diventato più grande del valore fi¬ 
nale /espr.y/. Se non lo è, si ritorna indietro ad eseguire tutte le istruzioni 
comprese tra il FOR e il NEXT. Se il confronto rivela che il contatore è più 
grande di /espr.y/, l’esecuzione prosegue con l’istruzione che segue il NEXT. 

Se STEP è negativo, il valore finale /espr.y/ deve essere minore di quello i- 
niziale, e il ciclo FOR...NEXT è ripetuto decrementando il contatore. 

ESEMPIO 

17. questo programma disegna sul video una funzione incorniciata in 
un rettangolo di asterischi. Si usa la funzione SIN che restituisce il se¬ 
no del numero passatole come parametro. 

Il programma richiede il numero di colonne del video (digitare 40 op¬ 
pure 80 a seconda del computer a disposizione) necessario per di¬ 
mensionare il rettangolo, quindi richiede gli estremi dell'Intervallo desi¬ 
derato e il passo di incremento. A questo punto disegna il rettangolo 
(subroutine 2000-2070) e nel suo interno la funzione calcolata nell'in- 
tervallo e con il passo introdotti. 
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Si provi ad eseguire il programma con: 

primo estremo 0 

secondo estremo 3.14 
passo 0.2 

10 REM FUNZIONE 

15 INPUT“COLONNE VIDEO”;L2 

16 LI =20 

20 INPUT'PRI MO ESTREMO”;A 
30 INPUT'‘SECONDO ESTREMO";B 
40 INPUT“PASSO”;C 
50 GOSUB2000:REM DISEGNA QUADRO 
60 MN=SIN(A):MX=SIN(A) 

70 FOR X=A TO B STEP C 
80 Y=SIN(X) 

90 IF Y>MX THEN MX=Y 
100 IF Y<MN THEN MN=Y 
110 NEXT X 
120 PS=(MX-MN)/L1 
130 IX=0 

140 FOR X=A TO B STEP C 
150 IX=IX+1 

160 IY=L1—INT((SIN (X)—MN)/PS) 

170 GOSUB1000 
180 NEXT X 

190 PRI NT" SQ QQQ:QQQ QQQOO QOOQQQOiQ " 
200 END 
1000 PRINT"S 

1010 FOR 1=1 TO IY: PRINT“Q" ; :NEXT I 
1020 FOR 1=1 TO IX: PRiNT“j" ; :NEXT I 
1030 PRINT 
1040 RETURN 
2000 PRINT";#;:*” ; 

2010 FORI=1 TOL1 +1 :PRINT‘Q|*" ; :NEXT 
2020 PRINT"*" ; 

2030 FORI=1TOL2—3:PRINT"*” ; .NEXT 
2040 PRINT"®:*” ; 

2050 FORI=1TOL2—3:PRINT" *” ; :NEXT 
2060 FORI -ITOLI + 1 :PRINT"Oi*” ; :NEXT 
2070 RETURN 
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ESERCIZI 


18. scrivere un programma che calcoli il fattoriale di un numero uti¬ 
lizzando l’istruzione FOR...NEXT. 

19. scrivere un programma che calcoli la somma dei quadrati dei pri¬ 
mi N numeri interi, con N digitato da tastiera. 

20. scrivere un programma che approssimi il valore di PI-GRECO ri¬ 
cordando che la circonferenza è l'elemento separatore fra i poligoni in¬ 
scritti e circoscritti. 

(Traccia: raggio unitario. Il quadrato inscritto ha perimetro 5.65..., 
quello circoscritto 8. La circonferenza 2*p| -GRECO). 

21 . scrivere un programma che calcoli lo zero di una funzione usan¬ 
do il metodo di bisezione. 

(Traccia: si prendano due punti di partenza, uno a destra e uno a sini¬ 
stra del punto di annullamento; ci si avvicina a passi discreti). 

22 . scrivere un programma che, dati in ingresso il capitale iniziale e 
l’interesse, calcoli il capitale totale di ogni anno per i primi 40 anni e vi¬ 
sualizzi questi risultati in un'unica pagina di video. 


COMMODORE: CLR 
M20: CLEAR 

Mette tutte le variabili numeriche a 0, annulla tutte le stringhe, riinizia- 
lizza la “fine della memoria” e lo spazio della pila, infine libera lo spa¬ 
zio assegnato alle variabili di array. 

Questo comando può essere eseguito anche da programma, ma si de¬ 
ve fare molta attenzione affinchè non vengano provocati danni che im¬ 
pediscono la continuazione (in particolare per le subroutine, in quanto 
usano la pila). 

Questo comando è utilizzato per la pulizia della memoria dati da pro¬ 
grammi, utile con le tecniche di OVERLAY (aggancio automatico di 
programmi — vedi oltre). 

M20: ERASE 
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ERASE /array/ (* ,/array/ *) 

Questo comando permette la cancellazione di una o più matrici per e- 
ventuali ridimensionamenti o recupero spazio di memoria. 

É presente solo nel computer M20. 


COMMODORE: SYS 

SYS /variabile/ (* (/lista di argomenti/) *) 

con /lista di argomenti/ descritta da: /costante/!/variabile/ (* ,/co¬ 
stante/l/variabile/. .. ) 


É utilizzata per chiamare una subroutine scritta in linguaggio assem¬ 
bler. (Vedi anche la funzione USR). 

La /variabile/ deve contenere l’indirizzo del punto di partenza in me¬ 
moria della subroutine: non può essere una variabile di array. 

La/lista di argomenti/, contiene la lista degli argomenti che sono pas¬ 
sati alla subroutine. 

ESEMPIO: 

110 MIASUB=30200 
120 SYS MIASUB (AB) 

passa il controllo dell’esecuzione alla subroutine ASSEMBLER che ini¬ 
zia nella locazione di memoria 30200, con il parametro AB (che è una 
variabile precedentemente inizializzata). 

M20: CALL 

CALL /nome/ (* ( /lista argomenti/ ) *) 

Esegue la subroutine chiamata /nome/ scritta in linguaggio assembler 
o appartenente al sistema operativo PCOS. Gli argomenti nella lista 
devono essere separati da virgola. Se un argomento è di uscita (cioè 
conterrà un valore dopo l’esecuzione della subroutine) dovrà essere 
preceduto dal simbolo ’(§> ’. 
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ESEMPIO: 


A$=‘'LIST” 

CALL “PK” (&41,A$) 

L’esecuzione di queste due istruzioni assegna al tasto la parola ’list’. 
Il simbolo & specifica una costante esadecimale. 

WAIT 

COMMODORE: WAIT /indirizzo/ ,1 (* f j *) 

L’istruzione WAIT sospende l’esecuzione del programma finché uno 
specificato indirizzo di macchina presenta una specificata configura¬ 
zione di bit. Il dato letto all’indirizzo, è messo in OR-esclusivo con l’e¬ 
spressione intera J, ed è messo in AND con I. Se il risultato è 0, si ri¬ 
torna a leggere un altro dato all’indirizzo specificato; se il risultato è 
non zero, l’esecuzione continua con la successiva istruzione. 

L’OR-esclusivo è definito: 

X Y X OR-EX Y 

0 0 0 

1 0 1 

0 1 1 

1 1 0 

ATTENZIONE: è possibile entrare in un ciclo senza termine con questa 
istruzione nel qual caso si deve riinizializzare manualmente la macchi¬ 
na. 

L’istruzione WAIT è prevalentemente utilizzata per il colloquio con u- 
nità periferiche non standard. La macchina resta in attesa che l’unità 
periferica esterna gli passi dei dati modificando la locazione designata. 

ESEMPIO 

18. l'istruzione seguente: 

100 WAIT 59411,8,8 
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sospende l'esecuzione del programma finché non è premuto il tasto 
PLAY dell’unità a nastro (premendo quel tasto viene messo un partico¬ 
lare dato nella locazione 59411). 
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CAPITOLO 8 


LA PREPARAZIONE DI UN DIAGRAMMA 
DI FLUSSO (FLOW-CHART) 


Prima di scrivere un programma, è buona norma tracciare uno schema 
che rappresenti graficamente la sua logica. 

Lo schema che discuteremo è il cosiddetto flow-chart (o schema di flus¬ 
so, o diagramma di flusso). 

Il flow-chart è uno schema formato da figure geometriche di diverso for¬ 
mato, unite da archi orientati. A seconda della loro forma, le figure assumo¬ 
no particolari significati: 


le figure circolari indicano inizio o termine di programmi 
le figure rettangolari indicano blocchi operativi 
le figure romboidali indicano blocchi decisionali. 


Partendo dal blocco di inizio (start), seguendo i segmenti orientati, si con¬ 
trolla il cammino compiuto dal calcolatore durante l’esecuzione del pro¬ 
gramma. 


Tracciamo il flow-chart (in cui non compaiono blocchi decisionali), del 
programma PROG1.1. 
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START 



Tracciamo ora il flow-chart di un programma che calcola le radici di una 
equazione di secondo grado (soluzione dell’esercizio 15.parte seconda) nel¬ 
la forma: 

AX 2 +BX+C=0 

Le radici sono calcolate semplicemente dalle espressioni: 

Xi = (_b- VB 2 -4AC) /(2 A) 

X2=(—B+V / B 2 —4AC)/(2A) 

ma bisogna controllare che il termine B 2 —4AC sia non negativo, per non dare 
alla funzione SQR (che calcola la radice quadrata), un valore negativo, con 
conseguente visualizzazione di: 

? ILLEGAL QUANTITY ERROR 
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Ecco il diagramma: 



Da un flow-chart è facile ricavare il programma corrispondente: 

10 REM EQUAZIONE SECONDO GRADO 
20 INPUTA,B,C 
30 U=B*B—4*A*C 

40 IFU<OTHENPRINT“RADICI NON REALI”:GOTO70 
50 X1 = (—B—SQR(U))/(2*A) 

60 X2=(—B+SQR(U))/(2*A) 

65 PRINTX1 ,X2 
70 END 
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Introduciamo il programma nella memoria del computer (ricordando di di¬ 
gitare prima il comando NEW). 

Ora possiamo risolvere automaticamente le equazioni di secondo grado. 
Per esempio consideriamo l'equazione: 

X 2 +5X+6=0 

Per trovare le sue radici, scriviamo RUN e all’apparire del punto interroga¬ 
tivo (che indica richiesta dati) scriviamo i numeri 1,5,6 (separati dalla virgo¬ 
la): compariranno i valori 

-3 -2 

cioè le radici della precedente equazione. 

Ora riscriviamo RUN e digitiamo i numeri 4,3,5: il risultato sarà il messag¬ 
gio 


RADICI NON REALI 

il che significa che l’equazione 4X 2 +3X+5=0 non ha radici reali. 

Un’ultima particolarità: con alcune terne di dati in input, il risultato finale 
non è esattamente la coppia di valori teorici aspettati, ma approssimazioni di 
questi. La spiegazione a questo fatto è da ricercare nelle approssimazioni in¬ 
terne di calcolo e di rappresentazione dei numeri floating point. 


ESERCIZI 

23. disegnare il flow-chart dei programmi finora svolti seguendone il 
flusso logico. 
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CAPITOLO 9 


FUNZIONI NUMERICHE 


COMMODORE—M20: ABS(X) 

calcola il valore assoluto di X, cioè: 

X se X>=0 
-X se X<0 


COMMODORE—M20: INT(X) 

calcola l’intero più grande minore o uguale a X. 

ESEMPIO: 

INT( 12.8) =12 
INT (— 4.3)=—5 

COMMODORE—M20: SGN(X) 

valuta il segno di X: 

se X>0 SGN(X)=1 

se X=0 SGN (X)=0 

se X<0 SGN (X) ——1 

ESEMPIO: 


ON SGN (X) +2 GOTO 100,200,300 
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salta a 100 se X<0 
salta a 200 se X=0 
salta a 300 se X>0 


COMMODORE—M20: SQR(X) 

calcola la radice quadrata di X. 

X deve essere maggiore o uguale a 0 


COMMODORE—M20: FRE(X) 

L’argomento della FRE è solo di comodo. Essa fornisce il numero di bytes 
liberi nella memoria (non usati dal BASIC). Dopo aver introdotto un pro¬ 
gramma in memoria, se desideriamo conoscere la memoria ancora disponi¬ 
bile, si deve digitare: 

PRINT FRE(0) 


COMMODORE RND(X) 

Questa funzione è utilizzata per generare numeri pseudo-causali tra 0 e 1 
(con 0 compreso e 1 escluso, cioè il numero 0 è generabile mentre il nume¬ 
ro 1 non potrà mai essere generato). 

Se l’argomento fornito alla funzione é positivo, il valore restituito é indi- 
pendente da esso. 

Se invece é negativo, il valore restituito dipende daN’argomento fornito. 

Se X=0 si genera un numero da un clock interno. 

L’utilità di questa funzione va ricercata in applicazioni di tipo statistico e in 
giochi col computer. 

M20: RND 

Nell’M20 viene generata sempre la stessa sequenza random; se la si desi¬ 
dera cambiare si deve scrivere (prima di RND), il comando RANDOMIZE, e 
digitare un numero compreso nell’intervallo —32768, +32767. Questo co¬ 
mando inizializza il generatore di numeri ad una nuova sequenza. 

Anche nell’M20 i numeri generati ad ogni chiamata di RND sono compresi 
nell’intervallo 0, +1. 
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ESEMPIO 


19. il programma che segue genera ‘n' numeri interi pseudo-casuali 
compresi fra ‘0’ ed 'm\ 


10 

REM GENERATORE 

DI INTERI 

20 

PRINT"VOOOQ:” 


30 

INPUT-QUANTI NUMERI" ; N 

40 

INPUT"MINORI DI” 

;M 

45 

PRINT'#’ 


50 

FOR 1=1 TO N 


60 

GOSUB1000 


70 

PRINTX, 


80 

NEXT 


90 

END 


1000 

REM GENERATORE 


1010 

X=INT (RND(1)*M) 


1020 

RETURN 



ESEMPIO 

20. questo programma utilizza il generatore del precedente esempio 
per simulare il lancio di un dado. 

10 REM DADO 
20 PRINT“||” 

30 X=INT (RND (1 )*6+1 ) 

40 ON X GOSUB 1000,2000,3000,4000,5000,6000 
50 PRINT“OQO” 

60 INPUTUN ALTRO LANCIO (S/N)” ; A$ 

70 IF A$="S” OR A$=“SI” THEN20 
80 END 

1000 PRINT" ]]]]])) ]])R 

ioio PRiNT”)]jmnjjR 

1020 PRINT"]}))}] ]) }}R ■ R ” 

1030 PRINT"|}J]]])i}]R 

1040 PRINT"]]) jJ])))]R 
1100 RETURN 
2000 PRINT")]]}] ] |} }}R 
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2010 

PRINT'immUlR 

■ 

R 


” 

2020 

PRINT" | Ul k] ] j j |R 



” 


2030 

pRiN-rnmmim 


■ 

R 

” 

2040 

PRINT“im}}JWR 



” 


2100 

RETURN 





3000 

PRINT-mtlIJUlR 



” 


3010 

PRINT"] JlUMjlJR 

■ 

R 



3020 

PRINT" H ]]]}] )j IR 


■ 

R 

” 

3030 

PRI NT" 1 ]]}} IH 3 ift 


■ 

R 

” 

3040 

PRINT" li UH] HI R 



” 


3100 

RETURN 





4000 

PRINT" 1 ]]]]}]]]] R 



" 


4010 

PRINT" ] ] ] ]}] t f 11R 

■ 

R 

■ 

R 

4020 

pri NT- hi imm 



” 


4030 

PRINT-JHIHBHR 

■ 

R 

■ 

R 

4040 

PRINT"] HI}}]}] IR 



” 


4100 

RETURN 





5000 

print" ih imam 



” 


5010 

pRiNT-nnmniR 

■ 

R 

■ 

R 

5020 

PRI NT"}.}}}}]} 3HR 


■ 

R 

” 

5030 

print" in imriiR 

■ 

R 

■ 

R 

5040 

PRINT" m ilHiHR 



” 


5100 

RETURN 





6000 

PRINT" })] IJjH tfR 



t * 


6010 

PRiNT-iHHliliB 


R 

■ 

R 

6020 

PRINT" HH] ]3))]RB 


R 

■ 

R 

6030 

PRINT" mi] IHHRB 


R 

■ 

R 

6040 

PRINT" jmiiiiUR 



” 


6100 

RETURN 






ESERCIZI 


24. Costruire un generatore di numeri interi compresi tra —10 e +10. 
Costruire un generatore di numeri interi positivi dispari minori di 100. 


25. Generare 100 numeri casuali tra 0 e 1 ; calcolare quindi la media 
e la varianza. 

(La varianza è definita con la relazione: 


V= L 


(Xi - MD) 
N 
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Ove Xi rappresenta il valore dell'i-esimo numero, MD rappresenta il valore 
medio dei numeri generati ed N la quantità dei numeri generati (in questo 
caso 100). 


COMMODORE—M20: COS(X) 

calcola il coseno di x in radianti 

COMMODORE—M20: EXP(X) 

calcola e (numero di Nepero: 2.71828183... ) elevato ad X: X deve essere 
<=88.02969191. 

COMMODORE—M20: LOG(X) 

calcola il logaritmo naturale di X: X deve essere maggiore di 0. 

COMMODORE—M20: SIN(X) 

calcola il seno di X in radianti 

COMMODORE—M20: TAN(X) 

calcola la tangente di X in radianti. 

COMMODORE—M20: ATN(X) 

calcola l’arcotangente di X in radianti; il risultato é nel range —pi/2, pi/2 


ESEMPIO 

21. questo programma disegna sul video una circonferenza. 


0 

REM DISEGNO 


1 

PRINT“1|” 


10 

A$=1Ì” 


20 

FORI=0TO6.28STEP.2 


30 

PRINTAS 


40 

G=20 + INT (COS (1 )*10 ) 


50 

H=12 + INT ( SIN ( 1 )*io 

) 

60 

FORJ—OTOG: PRINT“|” ; : 

NEXTJ 

70 

FORK=OTOH: PRINT' Q” ; 

; NEXTK 
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80 

90 

100 


PRINT"*” 

NEXTI 

END 


ESEMPIO 

22. questo programma visualizza sullo schermo la tabella relativa ad 
alcune funzioni numeriche. Attribuiamo all'argomento delle funzioni 
valori compresi fra 0 e PI - GRECO. 


10 

15 

20 

30 

40 

50 

60 


REM TABELLA DI FUNZIONI 


PRINT" * 


PRINT" X”," SIN (X)”,“ TAN(X)”," 

PRINT 

FOR X=0 TO 3.14 STEP 0. 1 
PRINTX, SIN(X), TAN(X), COS(X) 

NEXT X 


COS(X)” 


ESERCIZI 

26. Scrivere un programma che visualizzi il grafico della funzione 
tangente e della parabola. 

27. Scrivere un programma che tabuli la funzione Y=LOG(X*X), per 
valori di X compresi fra —1 e +1 e passo 0.1. Si faccia attenzione ad e- 
vitare di calcolare il logaritmo con argomento nullo. 
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CAPITOLO 10 


FUNZIONI PER IL TRATTAMENTO 
DELLE STRINGHE 


COMMODORE—M20: CHR$ ( I ) 

restituisce il carattere il cui codice ASCII é I. Questa funzione è comune¬ 
mente usata per specificare caratteri che non possono essere rappresentati 
in stringa. Questi caratteri sono per esempio i doppi apici (nel COMMODO¬ 
RE), il carattere ‘RETURN’, ecc. 

ESEMPIO: 

PRINT CHR$ (34) “PATATRACH" CHR$ (34) 

visualizza “PATATRACH" tra doppi apici. 

Si veda in appendice la tabella dei codici ASCII. 

COMMODORE—M20: ASC (X$) 

restituisce il valore numerico che é il codice ASCII del primo carattere della 
stringa X$. Se X$ è la stringa nulla viene visualizzato: 

“ILLEGAL QUANTITY" 

ESEMPIO: 

10 X$=‘‘TESTO” 

20 PRINT ASC (X$) 

30 PRINT CHR$ (84) 

40 END 
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RUN 

84 

T 

READY 

COMMODORE—M20: STR$ ( I ) 

trasforma l’argomento numerico X, in una stringa; 

ESEMPIO: 

10 A=11 

20 A$=STR$ (A) 

COMMODORE—M20: VAL (X$) 

trasforma la stringa X$ nel suo valore numerico: se il primo carattere non è 
$ o un numero, allora VAL (X$)=0. 

ESEMPIO 

se X$=“+12. 3” VAL (X$)=12. 3 

se X$=‘‘77AC9” VAL (X$)=77 

se X$=“G7783” VAL (X$)=0 


Funzioni per la manipolazione delle stringhe 

COMMODORE—M20: LEN (X$) 

restituisce il numero dei caratteri componenti la stringa X$ (ovvero la sua 
lunghezza); 

ESEMPIO: 

LEN (“ABCD”)=4 
LEN ("A 25 GB”)=7 

COMMODORE—M20: LEFT$ (X$,n) 

restituisce gli n caratteri più a sinistra di X$. n deve essere nel range 0, 255. 
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Se n é più grande della lunghezza della stringa, questa funzione associa 
l’intera stringa. Se n=0 é associata la stringa nulla. 


ESEMPIO 

23. esempio d’uso di LEFT$ 

10 REM PROVA LEFT$ 

20 A$=“ABCDEFGHILMNOPQRSTUVZ” 
25 PRINT "|§” 

30 FOR 1=1 TO 21 
40 B$=LEFT$ (A$ , I ) 

50 PRINTBS 
60 NEXT I 


Il risultato che compare sul video é 
A 

AB 

ABC 

ABCD 

ABCDE 

ABCDEF 

ABCDEFG 

ABCDEFGH 

ABCDEFGHI 

ABCDEFGH IL 

ABCDEFGHILM 

ABCDEFGHILMN 

ABCDEFGHILM NO 

ABCDEFGH ILMNOP 

ABCDEFGHI LMNOPC 

ABCDEFGHI LMNOPOR 

ABCDEFGHI LMNOPGRS 

ABCDEFGHI LMNOPORST 

ABCDEFGH ILMNOPORSTU 

ABCDEFGH ILMNOPCRSTUV 

ABCDEFGH ILMNOPQRSTUVZ 

COMMODORE—M20: MIDS (X$,n, (*,m *) ) 


83 






restituisce una stringa di m caratteri, che inizia dall’n-esimo carattere, n ed 
m devono essere nel range 0, 255. 

Se m é omesso, o se m é più grande del numero di caratteri a destra dell’n 
-esimo (contando anche l’n-esimo), sono presi tutti i caratteri a destra dell’n- 
esimo. Se n>LEN (X$), la funzione associa la stringa vuota. 


ESEMPIO 

24. esempio d'uso di MID$ 

10 REM PROVA MID$ 

20 A$="ABCpEFGHI LMNOPQRSTUVZ” 
25 PRINT “II’ 

30 FOR 1=1 TO 21 
40 B$=MID$ (A$, I ) 

50 PRINTB$ 

60 NEXT I 

Il risultato che compare sul video é 

ABCDEFGHILMNOPQRSTUVZ 

BCDEFGHILMNOPQRSTUVZ 

CDEFGHI LMNOPQRSTUVZ 

DEFGHI LMNOPQRSTUVZ 

EFGHI LMNOPQRSTUVZ 

FGHI LMNOPQRSTUVZ 

GHI LMNOPQRSTUVZ 

HI LMNOPQRSTUVZ 

I LMNOPQRSTUVZ 

LMNOPQRSTUVZ 

MNOPQRSTUVZ 

NOPQRSTUVZ 

OPQRSTUVZ 

PQRSTUVZ 

QRSTUVZ 

RSTUVZ 

STUVZ 

TUVZ 

UVZ 

VZ 

z 
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25. esempio d’uso di MID$ 


10 

20 

25 

30 

40 

50 

60 


REM PROVA MID$ 
A$=“ABCDEFGHILMNOPQRSTUVZ” 


PRINT"* 


FOR 1=1 TO 18 
B$=MID$ (A$, 1,4) 
PRINTB$ 

NEXT I 


Il risultato che compare sul video é 

ABCD 

BCDE 

CDEF 

DEFG 

EFGH 

FGHI 

GHIL 

HILM 

ILMN 

LMNO 

MNOP 

NOPQ 

OPQR 

PQRS 

QRST 

RSTU 

STUV 

TUVZ 


COMMODORE—M20: RIGHT$ (X$ , n) 

Restituisce gli n caratteri più a destra di X$. Se n=0 allora la funzione ri¬ 
torna la stringa vuota (di lunghezza zero). 


ESEMPIO 

26. esempio d'uso di RIGHT$ 
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10 REM PROVA RIGHT$ 

20 A$=“ABCDEFGHILMNOPQRSTUVZ” 
25 PRINT "V" 

30 FOR 1=1 TO 21 
40 B$=RIGHT$ (A$ , I) 

50 PRINTB$ 

60 NEXT I 


Il risultato che comparirà sul video è il seguente 
Z 

vz 

uvz 

TUVZ 

STUVZ 

RSTUVZ 

QRSTUVZ 

PQRSTUVZ 

OPQRSTUVZ 

NOPQRSTUVZ 

MNOPQRSTUVZ 

LMNOPQ RSTUVZ 

ILMNOPQ RSTUVZ 

HI LMNOPQ RSTUVZ 

GHILMNOPQRSTUVZ 

FGHILMNOPQRSTUVZ 

EFGH ILMNOPQ RSTUVZ 

DEFGHILMNOPQRSTUVZ 

CDEFGHILMNOPQRSTUVZ 

BCDEFGHILMNOPQRSTUVZ 

ABCDEFGHILMNOPQRSTUVZ 


ESEMPIO 


27. questo programma genera parole casuali di 6 lettere 


10 

15 

20 

30 


REM GENERATORE DI PAROLE 
PRINT"*” 

C$="BCDFGLMNPRSTVZ” 


V$=‘‘AEIOU” 
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35 

FOR J=1 TO100 


40 

U$=“ ” 


50 

FORI=1 T03 


60 

GOSUB1000 


70 

A=INT (X*i 4 ) + i 


80 

U$=U$+MID$ (C$ , 

A , 1) 

90 

GOSUB1000 


100 

A=INT (X*5) + 1 


110 

U$=U$+MID$ (V$ , 

A , 1) 

120 

NEXT 1 


130 

PRINTUS, 


140 

NEXT J 


150 

END 


1000 

X=RND (0) : RETURN 


Operazioni su stringhe 

Le stringhe possono essere concatenate usando il simbolo '+’ ; per esem¬ 
pio: 

10 A$=“CO.R. ” :B$=”EL. “ :C$=“IULI" :D$=“FR” 

20 E$=A$+B$+ +D$+C$ 

30 PRINT E$ 

RUN 

CO.R.EL. FRIULI 

Le stringhe possono essere confrontate usando gli stessi operatori rela¬ 
zionali usati per i numeri: 

=, <, <>, <=, > = 

i confronti sono effettuati prendendo ordinatamente un carattere alla volta 
da entrambe le stringhe, e confrontando i rispettivi codici ASCII. Se i codici 
corrispondono per entrambe le stringhe, allora esse sono uguali. 

Se durante i confronti dei caratteri, una stringa termina, essa viene consi¬ 
derata minore. I blanks sono significativi. 

ESEMPIO 

“AABB" < “AB” 

“UDINE” = “UDINE” 

“UDINE” < “UDINE ” 

“AA A” < “AAA” 
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esempio 


28. questo programma inverte una stringa data in ingresso 


10 

REM INVERSIONE STRI 

15 

PRINT" Vi” 


20 

INPUT “STRINGA” ; 

A$ 

30 

L=LEN (A$) : B$=" 

” 

40 

FOR l=L TO 1 STEP 

-1 

50 

B$=B$+MID$ (A$ , 

, 

60 

NEXT 1 


70 

PRINT “QQQ" 


80 

PRINTAS CHR$ (13) 

B$ 


1 ) 


(Si noti che l’istruzione 80 é equilavente alla coppia di istruzioni: 

70 PRINT A$ 

80 PRINT B$ 

Infatti CHR$ (13) è il carattere 'RETURN' ovvero il carattere che posi¬ 
ziona a capo il cursore). 


ESERCIZI 

28. si scriva un programma che visualizzi tutte le permutazioni possi¬ 
bili delle lettere che formano una data parola introdotta da tastiera. 

29. scrivere un programma che data una stringa in ingresso visualiz¬ 
zi un suo anagramma generato casualmente. 

30. scrivere un programma che data una stringa in ingresso visualiz¬ 
zi tutte le sue sottostringhe di 1, 2 e 3 caratteri. 
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CAPITOLO 11 


GESTIONE MATRICI 


COMMODORE—M20: 

DIM /variabile incaciata/ (* ,/variabile indiciata/...*) 

con /variabile indiciata/ descritta da: 

/variabile/ ( /numero/ (* ,/numero/...*) ) 

Questa istruzione è utilizzata per assegnare memoria sufficiente alle va¬ 
riabili di array (matrici). 

Se una variabile è usata senza una istruzione DIM, viene automaticamen¬ 
te assegnata una dimensione massima di 10. 

Se un indice di array supera il massimo dichiarato, si ha un messaggio 
d’errore: 

BAD SUBSCRIPT ERROR IN /numero di linea/ 

Il minimo valore degli indici è sempre 0. 

L’istruzione DIM mette tutti gli elementi dell'arrày a 0. Le matrici possono 
avere fino a 255 dimensioni, ma l’effettiva ampiezza dipende dalla memoria 
disponibile. 


ESEMPIO: 

DIM A(20),R3(5,5),DD$(2,2,4) 
definisce le matrici A, R3, DD$ 
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Nell’M20 vi è la possibilità di cancellare una matrice (e quindi ridimensio¬ 
nare se desiderato), tramite il comando: 

ERASE /lista di array/ 


dove /lista di array/ è una serie di nomi di array, separati da virgola. 

I noltre neN’M20, si può anche definire il minimo valore dell’indice di array, 
scelto tra 0 o 1, tramite il comando: 

OPTION BASE Oli 


Selezionando 1, il minimo valore degli indici di array diventa il numero 1. 


ESEMPIO 

29. questo esempio richiede 16 numeri da tastiera e li memorizza in 
un vettore. 

Quindi calcola la loro media e li visualizza insieme al loro scarto. 


10 REM VETTORE 
20 DIM A( 16) :T=0 
30 FOR 1=1 TO 16 
35 PRI NT" ^ NUMERO”!; 

40 INPUTA(I):T=T+A(I) 

50 NEXT I 

60 GOSUB1000:REM CALCOLO MEDIA 
70 GOSUB2000:REM VISUALIZZAZIONE 
80 END 

1000 REM CALCOLO MEDIA 
1010 MD=T/16 

1020 RETURN 

2000 REM VISUALIZZAZIONE 
2005 PRINT“VALORE”,"SCARTO” 

2010 FOR 1=1 TO 16 
2020 PRINTA(I),A(I)-MD 
2030 NEXT I 
2040 RETURN 


90 





ESEMPIO 


30. questo programma richiede in ingresso ‘n’ numeri e li riordina in 
modo crescente in un vettore; quindi li stampa. 


10 

20 

30 

35 

40 

45 

50 

60 

70 

80 

90 

1000 

1020 

1030 

1040 

1050 

1060 

2000 

2010 

2020 

2030 

2040 

3000 

3010 

3020 


REM SORT 

INPUT" ^QUANTI NUMERI”;N 
DIM M(N) 

PRINTiPRINT 
FOR 1=1 TO N 
PRINT“|£NUMERO”l; 

INPUTM(I) 

NEXT I 

GOSUB1000:REM ORDINAMENTO 
GOSUB2000:REM VISUALIZZAZIONE 
END 

REM ORDINAMENTO 
FOR 1=1 TO N 
FOR J=l TO N 

IF M(J)<M(I) THEN GOSUB3000 

NEXT J,l 

RETURN 

REM VISUALIZZAZIONE 
FOR 1=1 TO N 
PRINTM(I) 

NEXT I 
RETURN • 

REM INVERSIONE POSIZIONI 

A=M(I):M(I)=M(J):M(J)=A 

RETURN 


ESERCIZI 

31. scrivere un programma che ricerca il massimo e il minimo in un 
vettore di numeri. 


32. scrivere un programma che ordini i numeri memorizzati in un 
vettore in modo decrescente. 
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33 . come il precedente, ma considerando i valori assoluti (senza 
considerare i segni). 

34. scrivere un programma che dati due vettori ordinati in modo cre¬ 
scente, ne costruisca un terzo che sia la fusione ordinata in modo cre¬ 
scente dei vettori dati. 

35. scrivere un programma che ordini alfabeticamente un vettore 
contenente stringhe. 

36. scrivere un programma che dati due vettori numerici di identiche 
dimensioni (n(x) e m(x) ), costruisca una matrice quadrata (a(x,x) ), in 
cui: 


a(i,j)=n(i)*m(j) 

37. scrivere un programma che data la matrice quadrata a(x,x), co¬ 
struisca un’altra matrice quadrata b(x,x) trasposta della prima, cioè in 
cui: 


b(i,j)=a(j,i) 

38. scrivere un programma che calcoli il prodotto della matrice qua¬ 
drata a(xx) per il vettore b(x). Il risultato di tale prodotto è un vettore 
c(x) così definito: 

c(i) = Èa(i,j)*b(j) 

i-i 
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CAPITOLO 12 


ULTERIORI ISTRUZIONI BASIC 


Le Istruzioni END, STOP, CONT 

COMMODORE—M20: END 

Questa istruzione termina il programma in esecuzione. 

L’istruzione END può essere disposta ovunque nel programma; diversa- 
mente dall’istruzione STOP, non manda nessun messaggio di BREAK, ovve¬ 
ro non indica in quale numero di linea è avvenuta l’interruzione. Una istruzio¬ 
ne END alla fine del programma è opzionale. 

COMMODORE—M20: STOP 

È simile alla END, ma quando viene eseguita, il programma termina e vi¬ 
sualizza: 

BREAK IN LINE nnnnn 

dove nnnnn è il numero di linea dell’istruzione STOP. 

COMMODORE—M20: CONT 

Per continuare l'esecuzione del programma dopo che è stato premuto il 
tasto 'STOP', o è stata incontrata una istruzione STOP o una istruzione END. 
L'esecuzione rincomincia dal punto in cui c’era stata l'interruzione. 

CONT è solitamente usata insieme a STOP per il "debugging”: quando l’e¬ 
secuzione è fermata si possono esaminare i dati intermedi. L’esecuzione 
quindi può ripartire con il comando CONT, oppure con il comando GOTO 
/nnnnn/, il quale fa ripartire il programma dalla linea /nnnnn/. 
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Le funzioni TAB e SPC 

COMMODORE—M20: TAB(n) 

Il cursore si posiziona sulla colonna ‘n’ del video. Se la corrente posizione 
supera già la n-esima colonna, il cursore si posiziona, su quella colonna, nel¬ 
la riga successiva. 

n=0 è la posizione più a sinistra; la larghezza del video meno 1 è la posi¬ 
zione più a destra. TAB può essere usata solo nell’istruzione PRINT (ed an¬ 
che nel l’LPRINT sull’M20). Nell’M20 la posizione più a sinistra è n=1. 


COMMODORE—M20: SPC(N) 

Stampa ‘n’ blanks sul video, partendo dall'attuale posizione del cursore. 
Può essere usata solo nella PRINT ed ‘n’ deve essere nel range 0, 255. 


Definizione di funzioni 

COMMODORE—M20: 

DEF FN /nome/ (* (/parametro/) *)= 

=/definizione di funzione/ 


Definisce e battezza una funzione scritta dall’utente. 

/nome/ deve essere un nome di variabile. Questo nome, preceduto da FN, 
diventa il nome della funzione. 

/parametro/ se non è omesso è il nome della variabile che deve essere 
rimpiazzata quando la funzione è chiamata. 

/definizione di funzione/ è una espressione che specifica le operazioni 
della funzione. Essa deve essere limitata ad una linea di programma. 

I nomi di variabili che appaiono in questa espressione servono solo per la 
definizione della funzione; essi non influenzano le variabili del programma 
che hanno lo stesso nome. 

Se una variabile'usata nella definizione della funzione non appare come 
parametro, verrà usato il suo valore corrente. 

Non sono permesse definizioni di funzioni di tipo stringa. 

Se è specificato un tipo nel nome della funzione, il valore dell’espressione 
è forzato ad essere di quel tipo, prima del ritorno. 
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Se il tipo specificato nel nome non è associabile con il tipo della variabile 
usata nella istruzione di chiamata, c’è l’errore: 

TYPE MISMATCH 

Una istruzione di definizione deve essere eseguita prima della chiamata a 
tale istruzione, altrimenti avviene l’errore: 

UNDEFINED FUNCTION 

Nel computer M20, è possibile inoltre definire funzioni con più parametri, 
ed anche associare un tipo non numerico al nome della funzione. 


ESEMPIO 

31. definizione e chiamata di funzione: 

400 REM PARABOLA 
410 DEFFNQ(X) = (2*X*X—3*X+7) 
420 FOR x=1 TO 20 STEP .5 
430 y=FNQ(x) 

440 ? x,y 

450 NEXT x 
460 END 


ESEMPIO 

32. questa funzione restituisce l’arrotondamento matematico del pa¬ 
rametro fornito: 

10 DEFFNAR(Z)=INT (Z+0.5) 


Le funzioni POS, orologio, USR 

COMMODORE—M20: POS(n) 

Nel computer Commodore, questa funzione restituisce la corrente posi¬ 
zione del cursore lungo l’ascissa del video. La posizione più a sinistra è 0; 
l’argomento X è solo di comodo. 
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Nell'M20, restituisce la posizione del cursore lungo l’ascissa se l'argo¬ 
mento è uguale a 0, altrimenti restituisce la posizione del cursore secondo 
l’ordinata. 

Funzioni Orologio TI e Tl$ (COMMODORE) 

TI è usata per leggere il clock (orologio) interno, e restituisce un valore in 
1/60 di secondo. 

TI $ è usata per leggere il clock interno e restituisce una stringa di sei ca¬ 
ratteri che corrispondono aN’ora, ai minuti ed ai secondi. Può essere usata 
come una comune variabile di stringa, purché nelle assegnazioni si rispetti il 
formato descritto (vedi anche esempio 11). 

ESEMPIO: 

50 TI$=“091504” 

per inizializzare l’orologio alle 9.15 e 04 secondi. 

Le funzioni Orologio e data (M20) 

TIIV1E$, DATES 

Queste funzioni restituiscono l'ora e la data precedentemente inizializzate 
tramite assegnamento. 

ESEMPIO 

125 TIME$=“09.15.04” 

128 DATE$=“12/07/82” 

Si noti che il simbolo utilizzato per separare le parti di ora e di data, sarà 
utilizzato anche nella visualizzazione. 


La funzione USR 

USR ( /espr.num./ ) (COMMODORE) 

USR (* /cifra/ *) ( /espr.numer./ ) (M20) 

Questa funzione chiama una subroutine in linguaggio assembler, passan¬ 
dogli come parametro il valore dell’espressione numerica /espr.num./. 
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ESEMPIO: 

100 A=Z*COS(T) 

110 B=USR(A) 

120 C=USR(B+A) 

Nell’M20 la parte /cifra/ specifica a quale definizione di USR si intende fa¬ 
re riferimento (vedi DEF USR); se è omesso come default si ha USRO. Non 
si deve inserire alcuno spazio tra USR e /cifra/. 


Il Comando POKE e la Funzione PEEK 

COMMODORE: POKE l,J 

Questo comando è utilizzato per scrivere in un byte della memoria. 

L’espressione intera I è la locazione di memoria. L’espressione intera J è 
il dato da memorizzare. J deve essere nel range 0, 255, e I deve essere nel 
range 0, 65535. La funzione complementare della POKE è la PEEK, ed en¬ 
trambe sono spesso usate per passare efficientemente argomenti a subrou¬ 
tine in linguaggio assembler. 

Inoltre è utilizzata nelle operazioni di OVERLAY (aggancio automatico di 
programmi — vedi oltre). 

Per utilizzare il comando POKE al massimo della sua potenzialità occorre¬ 
rebbe conoscere molto bene il sistema operativo del Commodore (descritto 
in testi specifici). Per tale motivo lo tratteremo in modo non esaustivo, con 
esempi particolari ed essenzialmente associati alla gestione del video. 

Al video dei computers Commodore è associata una memoria RAM inter¬ 
na; ogni byte di tale memoria è associato ad una particolare posizione del vi¬ 
deo: in particolare nei modelli della serie 8000, alla posizione in alto a sini¬ 
stra è associato il byte 32768 e alla posizione in basso a destra il byte 34767; 
i byte intermedi corrispondono alle posizioni intermedie sul video. 

Nei computers delle serie 3000/4000 il range della memoria associata al 
video è 32768, 33767, 


ESEMPIO 

33. nei computer della serie CBM 3000 e CBM 4000, normalmente la 
tastiera è inizializzata per la scrittura maiuscola e la scrittura dei grafi¬ 
ci (shiftando i tasti). È possibile comunque passare nello 'stato carat- 
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ieri’ in cui i tasti rispondono con lettere minuscole e maiuscole. Ciò è 
fatto memorizzando nella locazione di memoria 59468 il numero 14 : 

POKE 59468,14 

Per ritornare nello stato grafico (lettere maiuscole e grafici), si deve 
digitare il comando: 

POKE 59468,12 

Nei computer della serie CBM 8000 il passaggio dallo stato caratteri 
allo stato grafico e fatto digitando il comando: 

PRINT CHR$(142) 

Per ritornare nello stato caratteri si deve digitare: 

PRINT CHR$(14) 


ESEMPIO 

34. sfruttiamo la corrispondenza memoria/video per scrivere sul vi¬ 
deo. 

Si usi il programma 34.a. nel caso del computer 8000, e il programma 
34.b. nel caso di computer 3000/4000: 

10 REM 34.A. SERIE 8000 
20 POKE 33602,67 
30 POKE 33603,73 
40 POKE 33604,65 
50 POKE 33605,79 
60 END 

10 REM 34.B. SERIE 3000/4000 
15 POKE 59468,14 
20 POKE 33140,67 
30 POKE 33141,73 
40 POKE 33142,65 
50 POKE 33143,79 
60 END 

L’istruzione 15 del secondo programma serve a cambiare il set di ca¬ 
ratteri. 


98 



PEEK(I) 

Questa funzione restituisce il valore in decimale del byte letto nella loca¬ 
zione specificata da I: I deve essere nel range 0, 65535. 

esempio 

Dopo aver utilizzato i programmi precedenti, si può rileggere la prima let¬ 
tera scritta sul video utilizzando rispettivamente le istruzioni 

?PEEK(33140) serie 3000/4000 

?PEEK(33602) serie 8000 
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CAPITOLO 13 


ALTRE ISTRUZIONI BASIC SULL M20 


Definizione di tipi: DEFI NT, DEFSNG, DEFDBL, DEFSTR 


DEFI NT /range/ (* , /range/ *) 
DEFSGN /range/ (* , /range/ *) 
DEFDBL /range/ (* , /range/ *) 
DEFSTR /range/ (* , /range/ *) 


:def. intera 
:def. sing. prec. 
:def. doppia prec. 
:def. stringa 


dove /range/ = /lettera/ 
oppure /range/ = /lettera/ - /lettera/ 


Con queste definizioni si specifica alla macchina che tutte le variabili ini¬ 
ziami con una particolare lettera, dovranno essere considerate di un partico¬ 
lare tipo. Se per esempio scriviamo: 

DEFINT A 


tutte le variabili con la prima lettera uguale ad A, saranno variabili intere. 
Se scriviamo: 

DEFSTR G-K 


tutte le variabili che iniziano per G, H, I, J, K, saranno di tipo stringa. 

Definizione DEF USR 

DEF USR (* /cifra/ *) = /espressione num./ 

È utilizzato per specificare l’indirizzo di inizio di una subroutine in linguag¬ 
gio macchina. 
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La cifra rappresenta il numero di sottoprogramma USR che si vuole defini¬ 
re; se viene omessa, come default si ha la cifra '0'. 

Il risultato dell'espressione (arrotondato all'Intero) è l'indirizzo della su¬ 
broutine. 


Istruzione VARPTR 

1. VARPTR (/variabile/) 

2. VARPTR ( # /numero di file/ ) 

Nel primo formato questa funzione restituisce l’indirizzo del primo byte as¬ 
sociato al dato specificato dalla variabile. 

Nel secondo formato se il file è sequenziale, restituisce l’indirizzo di inizio 
del buffer di I/O associato al file; se il file è relativo, restituisce l’indirizzo del 
buffer di Field. 


Istruzioni di conversione di tipi 

CDBL ( /espressione numerica/ ) 

Converte il risultato dell’espressione numerica in doppia precisione. 

ESEMPIO 

A = CDBL(AX) 


CI NT ( /espressione numerica/ ) 

Converte il risultato dell’espressione numerica nell’intero più vicino. 

ESEMPIO: 

A% = CDBL(52.58) 

? A% 

53 

OK. 


CSNG ( /espressione numerica/ ) 

Converte il risultato dell'espressione numerica in singola precisione. 
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ESEMPIO: 

AA = CSNG(125.231526 # ) 

? AA 

125.231 

OK. 


PIX ( /espressione numerica/ ) 

Restituisce la parte intera troncata del risultato dell’espressione. 
ESEMPIO: 

? FIX (52.26), FIX (-52.26) 

52 -52 

OK. 

HEX$ ( /espressione numerica/ ) 

Converte il risultato dell’espressione numerica (arrotondato all’intero) in 
una stringa con i caratteri esadecimali corrispondenti al numero. 

ESEMPIO: 

X = 16 
? X, HEX$(X) 

16 10 

OK. 

OCT$ ( /espressione numerica/ ) 

Converte il risultato dell'espressione numerica (arrotondato all’Intero) in 
una stringa con i caratteri ottali corrispondenti al numero. 

ESEMPIO: 

X = 8 

? X, OCT$(X) 

8 10 
OK. 


Istruzioni per la gestione di stringhe 

INSTR (/pos. di inizio/,/stringa/,/sottostringa/) 

Ricerca nella stringa specificata, a partire dalla posizione di inizio specifi- 
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cata la prima occorrenza della sottostringa; restituisce la posizione trovata, 
oppure il numero 0 se la sottostringa non è trovata. 

SPACE$ ( /espressione numerica/ ) 

Restituisce una stringa di spazi con lunghezza specificata dall’espressio¬ 
ne. 

STRING$ ( /lunghezza/ , /espressione numerica/ ) 

STRING$ ( /lunghezza/ , /stringa/ ) 

Nel primo caso restituisce una stringa di lunghezza specificata, con carat¬ 
teri tutti uguali e il cui codice ASCI I è specificato dall’espressione numerica. 

Nel primo caso restituisce una stringa di lunghezza specificata, con carat¬ 
teri tutti uguali al primo carattere della stringa specificata. 

INPUT$ ( /lunghezza/ (*,(*# *) /numero di file *) ) 
legge una stringa di lunghezza specificata dal buffer di tastiera o dal file i- 
dentificato dal numero di file, senza che i caratteri di controllo (RETURN, 
punteggiatura, ecc.) abbiano influenza. Il carattere CTRL C comunque inter¬ 
rompe l’esecuzione dell'Istruzione. 

SWAP /variabile/, /variabile/ 

Scambia fra loro il contenuto delle variabili specificate. Le variabili devono 
essere dello stesso tipo e devono effettivamente contenere dati. 

ESEMPIO: 

A=12:B=25:A$=“AAA”:B$=“CCC” 

? A,B,A$,B$ 

SWAP A,B:SWAP A$,B$ 

? A,B,A$,B$ 

12 25 AAA BBB 

25 12 BBB AAA 

WHILE/WEND 

WHILE /condizione/ 

WEND 


Questa coppia di comandi permette l’esecuzione delle istruzioni compre¬ 
se fra WHILE e WEND (while end) per tutto il tempo in cui la condizione (e- 
spressione logica o relazionale) risulta vera. 

Se la condizione è una espressione numerica le istruzioni racchiuse fra 
WHILE e WEND sono eseguite finché essa è diversa da 0. 
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Se l'espressione numerica è uguale a 0 o l’espressione logica-relazionale 
è falsa l’esecuzione prosegue con l’istruzione successiva a WEND. 
WHILE-WEND possono essere annidate. 

Debugging. 

Nel computer M20 sono presenti alcune istruzioni atte alla ricerca ed e- 
ventuale gestione degli errori presenti in un programma. 

TRON 

TROFF 

Questi due comandi attivano (TRON = TRACE ON) o disattivano (TROFF 
= TRACE OFF) lo stato di trace (traccia). Se questo stato viene attivato, si 
visualizzano man mano che sono eseguite, le istruzioni del programma. Le i- 
struzioni compaiono racchiuse fra parentesi quadre. 

ON ERROR GOTO /num.linea/ 

Durante una esecuzione normale di un programma, il verificarsi di un er¬ 
rore provoca l’interruzione del programma e l’emissione di un messaggio e- 
splicativo. Se è abilitata la routine di gestione dell'errore, il programma non 
si interrompe ma continua l’esecuzione con la linea specificata dal comando 
ON ERROR GOTO. 

Questo comando abilita la routine di gestione dell’errore, e specifica il nu¬ 
mero di inizio della routine. 

ON ERROR GOTO 0 disabilita la routine di gestione dell’errore. 
ESEMPIO: 


100 ON ERROR GOTO 1000 
110 INPUT # 1, A$ 

120 ... 

1000 REM GESTIONE ERRORE 
1010 IF ERR = 15 THEN ... 

1020 ... 

L’errore 15 è ‘string too long’ (stringa troppo lunga). 

ERROR /espressione numerica/ 

Simula il verificarsi di un errore; l’espressione numerica è il codice d’erro¬ 
re, e deve essere compreso tra 0 e 255. 

È usata solitamente per testare la routine di gestione dell’errore e in parti¬ 
colari controlli di dati. 
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ESEMPIO: 

100 ON ERROR GOTO 1000 
110 INPUT A 

120 IF A>800 THEN ERROR 250 

1000 ?“IL MASSIMO VALORE È 800" 

1010 RÉSUMÉ 110 

ERR 

ERL 

Queste variabili contengono, al verificarsi di un errore, il codice di errore 
(ERR) e il numero della linea in cui l’errore si è verificato (ERL). 

Sono solitamente utilizzati, in istruzioni IF...THEN e IF...GOTO, nelle rou¬ 
tine di gestione dell’errore. 

ESEMPIO: 

IF ERR = 15 THEN ... 

IF ERL = 425 THEN ... 

Se il comando che causa l’errore è scritto in modo immediato, la variabile 
ERL specifica il valore 65535. 

ESEMPIO: 

IF 65535 = ERL THEN ... 

Se il numero di linea specificato con ERL non compare nella parte destra 
del simbolo ’=’, non può essere cambiato dal comando di RENUM. 
RÉSUMÉ (* 0 ! NEXT ! /num. linea/ *) 

Questo comando permette la continuazione del programma dopo il verifi¬ 
carsi di un errore. Compare in generale, nella routine di gestione dell'errore. 

RÉSUMÉ o RÉSUMÉ 0, provocano la continuazione della linea che ha pro¬ 
vocato l’errore. 

RÉSUMÉ NEXT provoca la continuazione dalla linea successiva a quella 
dell’errore. 

RÉSUMÉ /num. linea/ provoca la continuazione della linea specificata. 

Grafica 

Nel computer M20 esiste un insieme di potenti istruzioni per la gestione 
della grafica. 

Il video è composto da una matrice di punti di 512 o 480 punti orizzontali 
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(secondo il tipo), e da 256 punti verticali. Il video può essere in bianco e ne¬ 
ro oppure a colori; in questo contesto noi tratteremo essenzialmente il video 
bianco e nero. 


WINDOW 

È possibile dividere il video in un certo numero (al massimo 16) di aree 
rettangolari dette finestre (window). È possibile trattare ogni finestra come 
un video particolare ed indipendente dalle altre finestre. Ogni nuova finestra 
è generata come suddivisione di un’altra finestra (che sarà detta finestra 
sorgente). 

/var/ = WINDOW (/quadrante/,/posizione/ (* , 

(* /spazio verticale/ *) (* ,/spazio orizzontale/ *) *) ) 

/var/ è una variabile intera alla quale il sistema assegna progressivamente 
un numero (associato quindi alla finestra), da 1 a 16. 

L'intero video è considerato come prima finestra quindi con codice 1. 

/quadrante/ specifica in quale parte della finestra sorgente si desidera a- 
prire la nuova finestra. Sono permessi i seguenti 4 codici: 

0 — parte più alta della finestra sorgente. 

1 - parte più bassa della finestra sorgente. 

2 — parte più a sinistra della finestra sorgente. 

3 — parte più a destra della finestra sorgente. 

/posizione/ specifica dove la finestra sorgente deve essere divisa per apri¬ 
re la nuova finestra. 

/spazio verticale/ è parametro opzionale che definisce lo spazio tra le ri¬ 
ghe: può variare nell’intervallo 10 (si ottiene 25 linee sullo schermo intero) e 
16 (si ottiene 16 linee sullo schermo intero). 

/spazio orizzontale/ è un parametro opzionale che può assumere solo due 
valori: il numero 6 (per ottenere 80 caratteri per linea sullo schermo intero) 
o il numero 8 (per ottenere 64 caratteri sullo schermo intero). 

Come caso particolare si ha: 

/var/ = WINDOW (0,0 (* , (* /spazio verticale/ *) 

(* ,/spazio orizzontale/ *) *) ) 

Con questa definizione non viene aperta nessuna nuova finestra, ma si uti¬ 
lizza per definire l’interlinea e l’interspazio tra i caratteri sullo schermo; al- 
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l’accensione della macchina (ambiente basic) il video è settato a 16 li nee 
per 64 colonne. 

WINDOW % /numero di finestra/ 

specifica una particolare finestra aperta precedentemente. 

COLOR = /codice colore/,/codice colore/, 

/codice colore/,/codice colore/ 

Questa istruzione seleziona 4 degli 8 colori disponibili. 


CODICE COLORE COLORE 

0 nero 

1 verde 

2 rosso 

3 giallo 

4 blu 

5 indaco 

6 viola 

7 bianco 


COLOR (* % /numero di finestra/ , *) 

/colore di primo piano/ (* , /colore di sfondo/ *) 

definisce il colore di disegno e di sfondo della particolare finestra specifica¬ 
ta. 


CLS (* % /numero di finestra/ *) 

cancella o l'intero video o la finestra specificata. 

SCALE (* % /num. fin./ , *) /xO/ , /xl/ , /yO/ , /yl / 

Definisce la scala fra il problema dell'utente e le coordinate hardware di 
video. 

x0,x1,y0,y1 sono i vertici della finestra specificata, come desiderati dal 
problema; sarà poi il sistema a tradurre i disegni in coordinate hardware. 

SCALEX e SCALEY ( /coordinate/ ) 

Definisce la scala fra il problema dell’utente e le coordinate hardware di 
video solamente sull’ascissa o sull’ordinata. 
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CLOSE WIN DOW (* % / num . fin ./ *) 

Chiude la finestra specificata o tutte le finestre se non compare la parte 

opzionale. 

CURSOR (* POINT *) (* ( X,Y ) *) (* on/off 
(* ,/lamp./ (* ,/forma/ *) *) *) 

Questo comando definisce le coordinate, specificate da X e Y, in cui il 
cursore per caratteri (CURSOR) e il cursore per grafici (CURSOR POINT) 
deve posizionarsi. 

on/off specifica se il cursore deve (on/off = 1) o non deve (on/off = 0) vi¬ 
sualizzarsi. 

/lamp./ specifica se il cursore non deve lampeggiare (lamp,=0) o deve 
lampeggiare con una intermittenza di x pulsazioni al secondo; x deve essere 
compreso nell'Intervallo 1, 20. 

/forma/ è un campo opzionale che altera l'aspetto del cursore. È un array 
di interi definito dall'utente e che definisce i pixel del cursore che devono es¬ 
sere accesi. 

PSET (* % /num.fin./ *) ( X,Y ) (* , /colore/ *) 

Accende il punto (pixel) specificato da X,Y, del colore di /colore/ se spe¬ 
cificato, altrimenti del colore di primo piano. 

PRESET (* % /num.fin./ *) ( X,Y ) 

Rimette il pixel specificato al colore dello sfondo. 

PAINT (* % /num.fin./, *) (X,Y) (* ,/colore/ 

(* ,/colore bordo/ *) *) 

Colora con il colore specificato la figura chiusa che raccoglie il pixel di 
coordinate X, Y. Se specificato /colore bordo/ viene colorato anche il bordo 
della figura. 

/var./ = POINT ( X,Y ) 

Restituisce il colore attivato nel punto di coordinate X, Y. 

LINE (* % /num.fin./ *) (* (* STEP *) ( X1,Y1 ) - *) 

(* (* STEP *) ( X2,Y2 ) *) (* ,(* /colore/ *) 

(* ,(* B (* F *) *) (* ,/azione/ *) *) *) 


109 



Permette di tracciare una linea od un rettangolo sullo schermo. 

ST £P è una parola chiave opzionale; se specificata permette di definire 
coordinate relative all’ultimo pixel disegnato sullo schermo. 

XI,Y1 sono le coordinate del primo punto della linea o un vertice del ret¬ 
tangolo; se sono omessi, il punto di inizio è preso l’ultimo pixel disegnato o il 
punto di coordina 0,0 (il vertice inferiore sinistro della finestra considerata). 

X2.Y2 sono le coordinate dell’ultimo punto sulla linea o il vertice opposto 
del rettangolo. 

/colore/ specifica il colore della linea o del rettangolo disegnato; se non è 
specificato, viene utilizzato il colore di primo piano. 

B (box) è un parametro opzionale che se specificato permette di tracciare 
il rettangolo con lati paralleli alla finestra e con diagonale specificata dalla 
coppia di coordinate. 

F (filled) può essere specificato solo insieme a B: BF traccia un rettango¬ 
lo completamente colorato. 

/azione/ può assumere uno dei seguenti valori: AND, OR, XOR, NOT, 
PSET, PRESET. PSET specifica che la linea o il rettangolo o il rettangolo 
riempito devono essere disegnati con il particolare colore (/colore/); PRE¬ 
SET indica invece che la linea o il rettangolo o il rettangolo riempito devono 
essere disegnati con il colore di sfondo; AND, OR, XOR specificano che la li¬ 
nea o il rettangolo o il rettangolo riempito saranno tracciati con il colore ri¬ 
sultate dall’operazione logica applicata al colore esistente sullo schermo e 
quello specificato; NOT inverte il colore esistente sullo schermo. Come de¬ 
fault il sistema considera l’azione PSET. 


CIRCLE (* % /num.fin./, *) ( X,Y ) ,/r/ (* ,(* ,/colore/ *) 

(* , (* /rapp./ *) (* ,/azione/ *) *) *) 

Disegna un cerchio o un ellisse sul video. 

Il centro del cerchio è specificato dalle coordinate X,Y; il raggio è specifi¬ 
cato dal parametro /r/. 

Il centro dell’ellisse è specificato da X,Y; in questo caso /r/ rappresenta la 
dimensione di mezzo asse orizzontale; la dimensione dell'asse verticale è 
specificata da /rapp./ che rappresenta il rapporto assiale dell’ellisse, /rapp./ 
deve essere un numero positivo; come default si ha /rapp./=0.85 che, a cau¬ 
sa della diversa densità di pixel tra orizzontale e verticale, genera un cer¬ 
chio. 

/azione/ definisce il colore di ogni punto sulla curva con le stesse modalità 
viste nell’istruzione LINE. 
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Memorizzazione di disegni. 

È possibile memorizzare parte o tutta una finestra in un vettore di interi, o 
a l contrario, visualizzare in una certa parte di video, un disegno precedente¬ 
mente memorizzato in un vettore di interi. 

GET (* % /num.fin./ *) (X1,Y1)-(X2,Y2) ,/array/ 

Memorizza nell’array unidimensionale /array,/ l'immagine dello schermo 
compresa nel rettangolo di vertici opposti XI,Y1 e X2,Y2. L’array, che viene 
specificato tramite il suo primo elemento, deve essere precedentemente di¬ 
mensionato tramite la seguente formula: 

. . . vp * op „ 

video in bianco e nero: —-—+3 

16 

. . vp * op _ 

video a colori: " +3 

O 

dove hp = dimensione verticale in pixel 
op = dimensione orizzontale in pixel 

PUT (* % /num.fin./ *) (X1,Y1)-(X2,Y2) ,/array/ 

(* ,/azione/ *) 

Visualizza l’immagine precedentemente memorizzata neN'array specifica¬ 
to, nel rettangolo di vertici opposti XI,Y1 e X2,Y2. 

/azione/ definisce il colore di ogni punto dell’Immagine con le stesse mo¬ 
dalità viste nell’istruzione LINE. 

DRAW (* % /num.fin./ *) /stringa di contando/ 

Muove un pennello virtuale aN’interno della finestra, e traccia linee di un 
certo colore. 

La stringa di comando è formata con i comandi specificati nella seguente 
tabella: 

— M dx,dy :sposta il cursore dalla posizione attuale (x,y) alla posi¬ 
zione (x+dx,y+dy). 

— J x,y :sposta il cursore alla posizione di coordinate x,y. 

- U dy :sposta il cursore in sù di ‘dy’ pixel. 

— D dy :sposta il cursore in giù di ‘dy’ pixel. 

— Ldx :sposta il cursore a sinistra di ‘dx’ pixel. 

— R dx :sposta il cursore a destra di ’dx’ pixel. 

— C/colore/ :attiva un particolare colore per il pennello. 
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Ogni comando può essere preceduto dall’opzione B, che inibisce la trac¬ 
cia del pennello; e può essere seguito dal codice di azione che permette di 
definire (come si è specificato nel comando LINE) il tipo di colore tracciato 
sul video. 

I verbi dell’azione sono rappresentati con le lettere: 

A AND 

O OR 

X XOR 

N NOT 

P PSET 

R PRESET 


Istruzioni di sistema 
SYSTEM 

Questo comando permette di ritornare nell'ambiente di sistema operativo 
PCOS. Può essere utilizzato sia in programma che in modo diretto. Chiude 
tutti i files dati aperti. 

EXEC /espressione stringa/ 

Esegue un comando PCOS o una subroutine in assembler, /espressione 
stringa/ é interpretato come un nome di subroutine seguito da una serie di 
argomenti costanti. Se EXEC esegue un comando PCOS, il contenuto della 
stringa deve essere esattamente quello che si scriverebbe per lo stesso co¬ 
mando in ambiente PCOS. 

ESEMPIO: 

10 EXEC-“pi ve” 

20 A$=“vc 1 :=0:” 

30 EXEC A$ 
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Mancano le pagine 113-199 



Questa subroutine permette la stampa di lettere minuscole: 

60000 R8$=“”:L9=LEN(R9$):FORW9=1TOL9: 

C9$=MID$(R9$,W9,1) :A9=ASC(C9$) 

60010 IFA9>64ANDA9<91 THENA9=A9+32 
60020 R8$=R8$+CHR$(A9) :NEXTTW9: RETURN 

La riga da stampare perviene alla subroutine come R9$ e ritorna alla rou¬ 
tine principale per la stampa su stampante Honeywell come R8$. 


Esempio di programma per Subroutine 

5 POKE 59468, 14 
10 INPUT ‘'RIGA"; R9$:GOSUB60000 
20 OPEN 1,5: PRINT#1,R8$: CLOSE 1 
40 END 
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APPENDICE C 


Per il sistema Commodore, oltre alle caratteristiche di sistema analizzate 
in questo testo, sono stati sviluppati numerosi supporti hardware/software 
che potenziano notevolmente le sue possibilità. In questa appendice descri¬ 
veremo brevemente alcuni tra i più interessanti ‘optional’ disponibili. 


1. SCHEDA GRAFICA AD ALTA RISOLUZIONE 

Questa scheda, sviluppata dalla Commodore U.K. propone le seguenti 
possibilità: 

— una pagina di video con risoluzione 512 x 512 

— due pagine di video con risoluzione 512 x 256 

— scrolling tra le due pagine di video 

— commutazione tra le pagine di video 

— rappresentazione di entrambe le pagine sovrapposte 

— rappresentazione contemporanea o separata delle normali istruzioni di 
video e di grafica 

— labels su video in corrispondenza di punti o linee, a partire da qualsiasi 
posizione e nella direzione dei quattro assi maggiori. 

— gestione diretta del cursore per disegnare su video da tastiera 

— disegno sotto modalità di reverse 


Segue una lista dei comandi che si vanno a sommare a quelli già esistenti: 

GRMODE: stabilisce le sovrapposizioni video e le modalità di risoluzione 

CLEAR: cancella il contenuto delle pagine di video 

PAGE: definisce la pagina su cui lavorare e la pagina da visualizzare 

(non necessariamente coincidenti) 

SCROLL: permette lo scorrimento del video verso l’alto o verso il basso 
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REV: 

MOVE: 

IMOVE: 

DRAW: 

IDRAW: 

PEN: 

LANGLE: 

APT: 

IPT: 

FILL: 

LABEL: 

LPLACE: 

WHERE: 

TESTP: 

CURS: 

OBJECT: 

RBYTE: 

WBYTE: 

VDU: 


attiva il reverse 

trasferisce al punto con coordinate specificate, la posizione del 
disegno 

trasferimento relativo della posizione del disegno 

traccia una linea dalla posizione occupata sino alla posizione 
specificata; può essere visibile, non visibile o reverse 

traccia una linea in modo relativo 

definisce il modo di disegnare; può essere normale, non visibi¬ 
le, reverse, per cancellare 

definisce un valore di rotazione 

trasferisce la posizione alle coordinate specificate 

trasferisce la posizione in modo relativo 

riempie un’area rettangolare, con diverse modalità 

scrive una stringa nella posizione attualmente occupata 

comanda il posizionamento della label 

riporta nell’argomento le attuali posizioni del disegno 

esamina lo stato del pixel alle coordinate specificate 

visualizza il cursore mentre disegna 

visualizza un oggetto alle coordinate specificate 

legge un byte dalla memoria video ad un indirizzo specificato 

scrive un byte nella memoria video 

dispone il PET in emulazione VDU 


2. SuperKRAM 

il SuperKRAM (metodo di accesso random a chiave) è un potente siste¬ 
ma operativo che permette la gestione generalizzata di dati afferiti tramite 
chiavi alfanumeriche. L'origine teorica di questo S.O. è il calcolo relazionale 
utilizzato nella scrittura dei DBMS relazionali (Data Base Management Sy¬ 
stem: sistema per la gestione di banche di dati). La sua architettura è molto 
efficiente e permette una riorganizzazione dinamica della struttura ad indici, 
permettendo quindi un minimo tempo di ricerca. 
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Per metodo di accesso a chiave alfanumerica si intende che il gruppo di 
dati riferiti come record, sono indirizzati tramite un nome anziché il numero 
di posizione, come invece accade nel metodo di accesso random. 

Nel superKRAM possono esistere più chiavi per afferire un record: una di 
queste, con la caratteristica necessaria di essere unica per ogni record del¬ 
l’archivio, è detta chiave primaria: tutte le altre eventuali chiavi sono dette 
chiavi alternative. Una chiave alternativa in generale non indirizza univoca¬ 
mente un record ma tutti i record con tale chiave coincidente: dovrà quindi 
essere fatta una selezione all'interno del gruppo riferito, per determinarne il 
record desiderato. Per esempio se organizziamo una rubrica telefonica, il 
numero telefonico sarà la chiave primaria (in quanto é sicuramente unico 
per ogni persona presente nell'archivio), ed il cognome potrebbe essere una 
chiave secondaria, utilizzata per esempio nella ricerca del record desidera¬ 
to: naturalmente potranno esistere più persone con lo stesso cognome, 
quindi si dovrà cercare quella interessata tra tutte quelle restituite dalla 
macchina. 

Segue una descrizione sintetica delle istruzioni messe a disposizione dal 
Super KRAM (oltre a quelle già esistenti). 


I) Funzioni per la gestione del sistema: 

UBUF: questo comando é utilizzato per definire il numero di archivi (fi¬ 

le dati) che possono essere contemporaneamente aperti (pos¬ 
sono essere al massimo 10). UBUF genera lo spazio necessa¬ 
rio nell’area adibita alla gestione del sistema (User Buffer Pool 
e Working Storage). 

IN IT: cancella l'area User Buffer Pool e Working Storage. 

KILL: rimuove il SuperKRAM dalla partecipazione attiva nel sistema. 

II) Funzioni per la gestione dei File: 

CREABASE: questo comando è utilizzato per creare inizialmente un file di 
dati. 

CREAIX: questo comando è utilizzato per definire chiavi alternative. 

ACCESS: questo comando è utilizzato per aprire un file di dati preceden¬ 

temente creato. 

SHUT: questo comando è utilizzato per chiudere un file di dati. 
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Ili) Funzioni per la gestione di I/O (ingresso/uscita): 

GTREC: questo comando permette di leggere un record da un file di 

dati. 

RDREC: questo comando permette di leggere in maniera sequenziale, 

records da un file di dati. 

RDSET: questo comando permette di leggere in modo sequenziale, re¬ 

cords con chiave alternativa identica. 

PUT: questo comando é utilizzato per variare un record esistente. 

ADD: questo comando è utilizzato per aggiungere un record al file di 

dati. 

ERASE: questo comando è utilizzato per eliminare un record dal file di 

dati. 

3. SCREEN GENERATOR EDITOR 

Lo Screen generator editor consente l’utilizzo di un nuovo set di istruzioni 
BASIC che permettono all’utente una più potente gestione di video. 

In particolare è possibile: 

— tracciare linee orizzontali e verticali. 

— visualizzare una variabile in una certa posizione. 

— salvare e caricare una pagina di video da disco. 

— definire campi per operazioni di data-entry. 

— definire il formato dei dati. 

— operare in precisione multipla con 22 cifre significative ed esponente va¬ 
riabile tra —64 e +63 

Segue una sintetica descrizione delle istruzioni aggiuntive. 

A) gestione di video: 

LINE: disegna una linea orizzontale sul video. 

COLL: disegna una linea verticale sul video. 

OUT: visualizza in una posizione specificata e con formato specificato il 

contenuto di una variabile. 

CLEAR: cancella una posizione specificata. 
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SP: salva una pagina di video sul disco. 

LP: carica una pagina di video dal disco. 

SCROLL: esegue lo scroll su una parte di video. 

B) gestione del data-entry (ingresso dati): 

La parte di sistema operativo che gestisce il data-entry (mini-editor) lavo¬ 
ra su un campo detto data-entry-filed. Su questo particolare campo il mini-e¬ 
ditor esegue la gestione di ingresso-uscita dati e le operazioni in doppia pre¬ 
cisione. 

REQZ: richiama il mini-editor per la gestione dei dati. 

INZ: assegna il valore del data-entry-field ad una variabile. 

ERAZ: annulla il data-entry-field. 

DECZ: definisce il formato del data-entry-field. 

ADD: esegue addizioni in doppia precisione. 

SUB: esegue sottrazioni in doppia precisione. 

MULT: esegue moltiplicazioni in doppia precisione. 

DIV: esegue divisioni in doppia precisione. 
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APPENDICE D 


LISTATI DI PROGRAMMI BASIC SU M20 

In questa appendice sono riportati alcuni programmi esemplificativi ripor¬ 
tati nel testo, con le opportune modifiche, necessarie per essere eseguiti 
sull'M20. 

I programmi non riportati sono eseguibili direttamente anche sull’M20, 
con l'unica differenza presente nell’istruzione di pulizia video: nell’M20 si 
dovrà sostituire l’istruzione ‘PRINT /clr-home/’ con l’istruzione ‘CLS’. 


10 REM esempiolO 
20 REM quadrato 
25 CLS 

30 K$=“ ***************************" 

35 K1$=“ * *” 

40 PRINT : PRINT : PRINT 
50 PRINT K$ 

60 PRINT K1$:PRINT K1$ : PRINT K1$ : PRINT K1$ : PRINT K1$ 
70 PRINT K1$ : PRINT K1$ : PRINT K1$ : PRINT K1$ 

80 PRINT K$ 


10 REM esempio 11 
20 REM orologio 
30 CLS 

40 INPUT “che ora è (HH/MM/SS)”;TI$ 

45 TIME$=TI$ 

48 CLS 

50 CURSOR (10,5) : PRINT “l’ora è : ”TIME$ 
60 GOTO 50 
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10 REM esempio17 
20 REM funzione 
22 W=WINDOW (0,0,10,6) 

25 LI =20 

30 INPUT“primo estremo”;A 
40 INPUT“secondo estremo”;B 
50 INPUT“passo’’;C 
60 GOSUB 1000:REM disegna quadro 
70 MN=SIN (A) :MX=SÌN (A) 

75 FOR =A TO B STEP C 
80 Y=SIN (X) 

90 IF Y>MX THEN MX=Y 
100 IF Y<MN THEN MN=Y 
110 NEXT X 
120 PS=(MX—MN)/L1 
130 IX=0 

140 FOR X=A TO B STEP C 
150 IX=IX+1 

160 IY=L1—1 NT ((SIN (X) - MN)/PS+, 5) 
170 GOSUB 2000:REM disegna punto 
180 NEXT X 
190 GOTO 190 
1000 REM disegna quadro 
1010 CLS 

1020 LINE (0,0) - (512,255) ,, B 
1025 LINE (0,128) - (512, 128) 

1030 RETURN 

2000 REM disegna punto 

2010 CURSOR (IX + 1, IY+3) 

2015 PRINT"*”; 

2020 RETURN 


10 

REM esempio 

19 

20 

REM random 


30 

CLS 


40 

INPUT‘‘quanti 

numeri";N 

50 

INPUT“minori 

di”; M 

60 

RANDOMIZE 


70 

CLS 
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80 FOR 1=1 TO N 
90 GOSUB 1000 
100 PRINT X, 

110 NEXT I 

120 END 

1000 REM generatore 
1010 X=INT (RND*M) 
1020 RETURN 


10 REM esempio20 
20 REM dado 
22 CLS 

25 RANDOMIZE 
30 CLS 

40 X=INT (RND*6 + 1 ) 

50 ON X GOSUB 1000,2000,3000,4000,5000,6000 
60 PRINT : PRINT : PRINT 
70 INPUT“altro lancio”;X$ 

80 IF X$"s” THEN 30 
90 END 

1000 GOSUB 9000 
1010 GOSUB 9090 
1020 RETURN 
2000 GOSUB 9010 
2010 GOSUB 9020 
2030 GOSUB 9090 
2040 RETURN 
3000 GOSUB 9000 
3010 GOSUB 9010 
3020 GOSUB 9020 
3030 GOSUB 9090 
3040 RETURN 
4000 GOSUB 9010 
4010 GOSUB 9020 
4020 GOSUB 9030 
4030 GOSUB 9060 
4035 GOSUB 9090 
4040 RETURN 
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5000 GOSUB 9010 
5010 GOSUB 9000 
5020 GOSUB 9020 
5030 GOSUB 9030 
5040 GOSUB 9060 
5050 GOSUB 9090 
5060 RETURN 
6000 GOSUB 9010 
6010 GOSUB 9020 
6020 GOSUB 9030 
6030 GOSUB 9040 
6040 GOSUB 9050 
6050 GOSUB 9060 
6060 GOSUB 9090 
6070 RETURN 


9000 

LINE 

(251,133) 

- (261,143) 

,, BF 

RETURN 

9010 

LINE 

(221,173) 

- (231,163) 

,, BF 

RETURN 

9020 

LINE 

(281,103) 

- (291,113) 

,, BF 

RETURN 

9030 

LINE 

(221,103) 

- (231,113) 

,, BF 

RETURN 

9040 

LINE 

(221,133) 

- (231,143) 

,, bf 

RETURN 

9050 

LINE 

(281,133) 

- (291,143) 

,, BF 

RETURN 

9060 

LINE 

(281,163) 

- (291,173) 

,, BF 

RETURN 

9090 

LINE 

(201,83) - 

- (311,193) , 

, BF.NOT : RETURN 


50409 60 


10 REM esempio27 
20 REM generatore parole 
25 RANDOMIZE 

30 CLS 

40 C$=“bcdfglmnprstyz" 
50 V$=‘‘aeiou” 

60 FOR J = 1 TO 100 
70 U$=“” 

80 FOR 1=1 TO 3 
90 GOSUB 1000 
100 A=INT (X*14) +1 
110 U$=U$+MID$(C$,A,1) 

120 GOSUB 1000 
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130 A=INT (X*5) +1 
140 U$=U$+MID$(V$,A,1) 

150 NEXT I 
160 PRINT U$, 

170 NEXT J 
180 END 

1000 REM generatore 
1010 X=RND :RETURN 


211 




APPENDICE E 


ALCUNI PROGRAMMI DIMOSTRATIVI SU M20 



10 CLS 

20 EXEC“la‘GRAFICO TRIDIMENSIONALE by D,R, ,60,200,2,0 
60 DEF FNA(Z)= 90*EXP (-Z*Z/600) 

70 K=5 

120 FOR X=-100 TO 100 
130 L=0 : P=1 

160 Y1=K*INT (SOR (10000—X*X)/K) 

170 FOR Y=Y1 TO -Y1 STEP -K 

190 Z=INT (100 + FNA(SQR(X*X+Y*Y)) - ,70106*Y) 

220 IF Z<L GOTO 300 
230 L=Z 

260 PS.ET (X+250.Z) 

280 IF P=0 THEN Z1=Z 
290 P=0 









300 NEXT Y,X 
330 GOTO 390 
360 REJURN 

390 LINE(140,20) - (360,190),,B 

400 LINE(0,198) - (512,198) 

410 PAINT (0,0) 

430 EXEC‘‘SP” 


5 REM orologiom20 
10 PI =3, 1415 
20 CLS 

30 CURSOR(30,5) : PRINT“ora:min:sec” 

40 CURSOR(30,6) : PRINT"/ I / 

50 CURSOR(31,7):INPUT;“”, A$ 

60 TIME$=A$ 

65 CLS 

70 CIRCLE(256, 128),70,,1 
80 CIRCLE(256,128),78,,1 

90 LINE(256,198) - (256,206) 

100 LINE(256,50) - (256,58) 

110 LINE(186,128) - (178,128) 

120 LINE(326,128) - (334,128) 

130 CURSOR(32,3):PRINT“12” 

140 CURSOR(44,8):PRINT“3” 

150 CURSOR(33,14) :PRINT“6” 

160 CURSOR(21,8):PRINT“9"; 

170 GOSUB 500:GOSUB 540:GOSUB 580 
180 GOSUB 1000 

185 LINE(256,128) - (XS,YS),,,NOT 

190 IF SI = >MI THEN LINE(256,128) - (XM,YM) 

195 IF SI = >OI*5 + 1~60 THEN LINE(256,128) - (XO,YO) 

196 GOSUB 1000 
200 GOSUB 580 

210 CURSOR(1, 1) :PRINT CHR$(7) 

215 IF SI =59 THEN GOSUB 300 
220 FOR T=0 TO 750:NEXT T 
225 GOTO 185 

300 LINE(256,128) - (XM,YM),,,NOT 

310 IF Ml = >01*5+ 1—60 THEN LINE(256,128) - (XO,YO) 
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315 GOSUB 540 

330 IF MI = >59 THEN GOSUB 400 
340 RETURN 

400 LINE(256,60) - (XO.YO) NOT 

410 OI=VAL (LEFT$(TIME$,2)) 

420 GOSUB 500 
430 RETURN 

500 OI=VAL(LEFT$(TIME$,2)):A==OI*PI/6 + PI/2 
505 XO=256—40*COS(A) 

510 YO=128+40*SIN(A) 

520 LINE(256,128) - (XO.YO) 

530 RETURN 

540 MI=VAL(MID$(TIME$,4,2)):A=MI*P|/30 + PI/2 

545 XM =256—50* (COS( A) 

550 YM=128+50*SIN (A) 

560 LINE(256,128) - (XM,YM) 

570 RETURN 

580 SI=VAL(RIGHT$(TIME$,2)):A=SI*PI/30 + PI/2 
585 XS=256—60*COS(A) 

590 YS=128+60*SIN (A) 

600 LINE(256,128) - (XS.YS) 

610 RETURN 

1000 CURSOR (30,15):PRINT TIME$ 

1010 RETURN 
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m 


5 

CLS 



6 

SCALE 0,768,0,384 

10 

CIRCLE (200,200),50,,.25 

20 

CIRCLE (200,100),50,,.25 

30 

LINE 

(149,200) - 

- (149,100) 

40 

LINE 

(250,200) - 

- (250,100) 

100 

LINE 

(400,50) - 

(500,100),,B 

110 

LINE 

(350,70) - 

(450,120),,B,NOT 

120 

LINE 

(400,50) - 

(350,70) 

130 

LINE 

(400,100) - 

- (350,120) 

140 

LINE 

(500,50) - 

(450,70) 

150 

LINE 

(500,100) - 

- (450,120) 

155 

GOSUB 500 


200 

PAINT (0,0) 


210 

LINE 

(0,0) - (51 

2,300),,BF,NOT 

220 

GOTO 210 


500 

LINE 

(80,70) - i 

(130,200),,B 

510 

LINE 

(100,150)— 

(145,280)„B,NOT 

520 

LINE 

(300,180) 

- (420,180) 

530 

LINE 

(320,200) 

- (440,200) 

540 

LINE 

(300,180) 

- (320,200) 






































550 

LINE 

(420,180) - 

- (440,200) 

560 

LINE 

(300,180) - 

- (380,240) 

570 

LINE 

(420,180) - 

- (380,240) 

580 

LINE 

(320,200) - 

- (380,240) 

590 

LINE 

(440,200) - 

- (380,240) 

600 

RETURN 



esempio file random 

500 REM-apertura file- 

510 OPEN “R” , 1, “Oiindirizzi”, 84 
520 REM-definizione campi- 

530 FIELD #1,30 AS NOME$, 20 AS INDiRIZZO$, 20 AS CITTA$, 
12 AS TELEFONOS, 2 AS ETA$ 

1000 REM-main- 

1020 CLS : PRINT TAB(23)“GESTIONE INDIRIZZI” 

1025 PRINT STRING$(64, “-”) 

1030 PRINT: PRINT: PRINT 

1040 PRINT TAB(10)"(1) INSERIMENTO - CORREZIONE” 

1050 PRINT 

1060 PRINT TAB(10)*‘(2) VISUALIZZAZIONE” 

1070 PRINT 

1080 PRINT TAB(10)”(f) FINE” 

1090 CURSOR (1,14):PRINT“premi un tasto” 

1100 A$=INKEY$:IF A$ *'"'GOTO 1100 
1110 IF A$=“1”THEN GOSUB 2000 
1120 IF A$=“2”THEN GOSUB 3000 
1130 IF A$=“f”THEN CLOSE:END 
1140 GOTO 1020 

2000 REM-inserimento e variazione- 

2010 CLS:PRINT TAB(12) “INSERIMENTO VARIAZIONE” 

2020 PRINT STRING$(64, 

2030 PRINT:PRINT 

2040 INPUT“CODICE”;CODICE: IF CODICE = 0 THEN RETURN 
2050 PRINT 

2060 INPUT“NOME”;NOMEW$ 

2070 INPUT"INDI RIZZO”;INDIRIZZOW$ 

2080 INPUT“CITTÀ”;CITTAW$ 

2090 INPUT“TELEFONO”;TELEFONOW$ 
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2100 INPUTETÀ ”;ETA% 

2110. CURSOR (1,14):PRINT“premere per conferma 
2120 A$ = INKEY$:IF A$="" THEN 2120 
2130 IF NOT ( A$ = “/” ) THEN 2000 
2140 LSET NOME$ = NOMEW$ 

2150 LSET INDIRIZZOS = INDIRIZZOW$ 

2160 LSET CITTA$ =CITTAW$ 

2170: LSET TELEFONO^ = TELEFONOW$ 

2180 RSET ETA$ = MK1$ (ETA%) 

2190 PUT#1, CODICE 
2200 GOTO 2000 

3000 REM-visualizzazione- 

3010 CLS:PRINT TAB(23)“VISUALIZZAZIONE" 

3020 PRINT STRING$(64, 

3030 PRINT:PRINT 

3040 INPUT“CODICE”;CODICE: IF CODICE = 0 THEN RETURN 

3050 PRINT 

3060 GET#,CODICE 

3070 ETA% =CUI (ETA$) 

3075 PRINT“NOME";NOME$ 

3080 PRINT“INDIRIZZO”;INDIRIZZO$ 

3090 PRINT“CITTÀ”;CITTA$ 

3100 PRINT“TELETONO”;TELEFONO$ 

3110 PRINT"ETÀ ”;ETA% 

3120 CURSOR (1,14):PRINT“premi un tasto per proseguire" 
3130 A$ = INKEY$ : IF A$=“” THEN 3130 
3140 GOTO 3000 


Alcuni programmi dimostrativi su Commodore con scheda grafica 

20 PRINT":*” 

22 REM INPUT ORA MIN SEC PARTENZA 

23 POKE59467,16:POKE59466,51 :POKE59464,0 

25 PRINT" j]| : umilimi ilQQQQQQQORA MIN SEC" 

30 print" iminin ini f in n i r 
35 PRiNT-innujnmnm n i r 
38 iNPUT"imjjnìJ]JJiim";T$ 

40 Tl$ =T$ 

45 SYS37602:CLEAR:GRAPH:REM CHIAMATA ROUTINE GRAFI¬ 
CA,CLEAR PAGINA GRAFICA 
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46 G0SUB1100 

47 GOSUB650 

48 CHAR“12”,152,179 : CHAR''3'',242,95 : CHAR“6”,156,10 
CHAR“9”,70,95 

70 GOSUB500:GOSUB540:GOSUB580 
80 GOSUB1000 
90 RDRAW160,99,XS,YS 
110 IFSI = >MITHENDRAW160,99, XM,YM 
120 IFSI = >01*5 + 1 -60THENDRAW160,99, XO.YO 
140 GOSUB580 

145 POKE59464,50:FORR=0TO20:NEXTR:POKE59464,0 

150 IFSI=59THENGOSUB200 

153 GOSUB1000 

154 FORT=0TO330:NEXTT 

155 GOTO90 

200 RDRAW160,99,XM,YM 

230 IFMI = >01*5+1 —60THENDR AVVI 60,99, XO,YO 

250 GOSUB540 

260 I FMI=59THENGOSUB300 

270 RETURN 

300 RDRAW1160,99,XO,YO 
330 OI=VAL(LEFT$(TI$,2)) 

350 GOSUB500 
360 RETURN 

500 OI=VAL(LEFT$(TI$,2)):A=OI*rr/6+7i/2 

505 XO=160—40*COS(A) 

510 YO=99+40*SIN(A) 

520 DRAW160,99, XO,YO 
530 RETURN 

540 MI=VAL(MID$(TI$,3,2)):A=MI*7t/30+n/2 

545 XM=160—50*COS(A) 

550 YM=99 + 50*SIN(A) 

560 DRAW160,99, XM,YM 
570 RETURN 

580 SI=VAL(RIGHT$(TI$,2)):A=+SI*7t/30+rc/2 

585 XS=160—60*COS(A) 

590 YS=99+60*SIN(A) 

600 DRAW160,99,XS,YS 

610 RETURN 

650 R=70:GOSUB700 



660 R=78:GOSUB700 

67.0 GOSUB750 
680 RETURN 

700 FORT=OTOh*2STEPti/230 

710 DRAW160+R*COS(T),99—R*SIN(T) 

720 NEXTT 
730 RETURN 

750 FORT=ti/ 2TO—3/2*7iSTEP—rc/6 

760 A=70*COS(T) +16Ò : B=99-70*SIN(T) : C=78*COS(T)+160 : 

D=99—78*SIN (T) : DRAWA,B,C.D 
770 NEXT 
780 RETURN 
1000 CHARTI$,250,20 

1010 RETURN 

1100 FORY=0TO10:FORU=0TO100:NEXTY:CHAR” OROLOGIO 
DR.”,80,190 

1200 FORU=0TO100:NEXTU:CHAR” OROLOGIO 
DR.”,83,190:NEXTY 
1300 RETURN 

READY 

10 SYS37602 

20 CLEAR:GRAPH 

60 DEFFNA(Z)=90*EXP(—Z*Z/600) 

110 K=5 

120 FORX=—100T0100 
130 L=0:P=1 

160 Y1 =K*INT (SOR (10000—X*X)/K) 

170 FORY=Y1TO—Y1STEP-K 

190 Z=INT(100 + FNA(SQR(XT2+Yr2))-.70106*Y) 

220 I FZ<LGOTO300 
230 L=Z 

260 DRAWX + 150,Z 

280 IFP=0THENZ1=Z 

290 P=0 

300 NEXTY.X 

390 END 

READY. 
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APPENDICE F 

CODICI ASCII 


ASCII 

CODE 

CHARACTER 

ASCII 

CODE 

CHARACTER 

ASCII 

CODE 

CHARACTER 

000 

NULL 

043 

+ 

086 

V 

001 

SOH 

044 


087 

W 

002 

STX 

045 

— 

088 

X 

003 

ETX 

046 


089 

Y 

004 

EOT 

047 

/ 

090 

Z 

005 

ENQ 

048 

0 

091 

t 

006 

ACK 

049 

1 

092 

bkslash 

007 

BEL 

050 

2 

093 

] 

008 

BS 

051 

3 

094 

T 

009 

HT 

052 

4 

095 

back arr 

010 

LF 

053 

5 

096 

space 

011 

VT 

054 

6 

097 

a 

012 

FF 

055 

7 

098 

b 

013 

CR 

056 

8 

099 

c 

014 

SO 

057 

9 

100 

d 

015 

SI 

058 


101 

e 

016 

DLE 

059 

j 

102 

f 

017 

DC1 

060 

< 

103 

g 

018 

DC2 

061 

= 

104 

h 

019 

DC3 

062 

> 

105 

i 

020 

DC4 

063 

? 

106 

i 

021 

NAK 

064 

©. 

107 

k 

022 

SYN 

065 

A 

108 

1 

023 

ETB 

066 

B 

109 

m 

024 

CAN 

067 

C 

110 

n 

025 

EM 

068 

D 

111 

0 

026 

SUB 

069 

E 

112 

p 

027 

ESCAPE 

070 

F 

113 

q 

028 

FS 

071 

G 

114 

r 

029 

GS 

072 

H 

115 

s 

030 

RS 

073 

1 

116 

t 

031 

US 

074 

J 

117 

u 

032 

SPACE 

075 

K 

118 

V 

033 

! 

076 

L 

119 

w 

034 

" 

077 

M 

120 

X 

035 

# 

078 

N 

121 

y 

036 

$ 

079 

O 

122 

Z 

037 

% 

080 

P 

123 


038 

& 

081 

Q 

124 

< 

039 

’ 

082 

R 

125 

= 

040 

< 

083 

S 

126 

> 

041 

> 

084 

T 

127 

DEL 

042 

* 

085 

U 
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ELETTRONICA 

DIGITALE 


INTEGRATA 


di Erbari Taub • Donald Schllllng 


Non esiste, in lingua italiana, un libro di testo cosi. 
Chiaro, completo, moderno, ma anche rigoroso e 
didattico. Sono alcuni tra gli aggettivi che 
costituiscono la prerogativa di questo volume. 

Per capire l'elettronica digitale bisogna avere delle 
solide conoscenze sui dispositivi a 
semiconduttore, soprattutto usati in circuiti di 
commutazione. E malgrado quest'analisi richieda 
una notevole complessità matematica, 
introducendo alcune semplificazioni, è possibile 
mantenere la trattazione ugualmente rigorosa e 
ottenere approssimazioni pienamente accettabili. 
Come trascurare poi gli amplificatori operazionali, 
che, se a rigore non rientrerebbero nella materia, 
però trovano larga applicazione in sistemi 
completamente digitali. E poi i circuiti integrati, 
finalmente spiegati e analizzati in tutti i loro 
aspetti. Dalla vecchia logica resistore-transistor 
(RTL), funzionale nella sua semplicità 
all’esemplificazione degli aspetti fondamentali, a 
quella a simmetria complementare (CMOS). 
Questo, però, dopo aver studiato un capitolo che, 
pur non richiedendo alcuna conoscenza 
preliminare, va a fondo dei concetti di variabili 
logiche, di algebra di Boote, di analisi di circuiti 
logici. E ancora. Via via nei vari capitoli: i flip-flop, 
i registri, e i contatori (sia sincroni che asincroni), 
i circuiti logici atti ad eseguire operazioni 
matematiche, le memorie a semiconduttore (RAM, 

ROM, EPROM.), l'interfacciamento tra segnali 

analogici e digitali (multiplexer, circuiti sample 

and hold.convertitori d/a e a/d), i 

temporizzatori. Tutto con oltre 400 problemi, dai 
più semplici ai più sofisticati, in cui vengono 
presentati i circuiti tipici che si trovano nella 
pratica. 

Un testo quindi non solo per gli specialisti e per 
gli studenti universitari, ma che si adatta 
magnificamente agli Istituti Tecnici. 

Un testo che, speriamo per gli studènti, la scuola 
non debba scoprire tra alcuni anni. 


SOMMARIO 

Dispositivi Elettronici Fondamentali; Amplificatori Operazionali e 
Comparatori; Circuiti Logici; Logica Resistore-Transistore e Logica 
ad iniezione Integrata; Logica Diodo-Transistore; Logica 
Transistore-Transistore, Logica ad Accoppiamento di Emettitore; 
Porte MOS; I Flip-Flop; Registri e Contatori; Operazioni Aritmetiche 
Memorie a Semiconduttore; Interruttori Analogici; Conversione 
Analogico-Digitale; Circuiti di Temporizzazione; Linee di 
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Questo libro è un validissimo supporto e strumento di “lavoro” per tutti 
coloro che vogliono o devono imparare a programmare in BASIC con un 
personal computer Commodore o con l’M20 Olivetti. 

In modo schematico ma rigoroso, completo ma semplice, e sempre con 
l’ausilio di numerosissimi esempi ed esercizi, il lettore potrà trovare, tutte le 
istruzioni, comandi, informazioni e consigli che gli permetteranno, in modo 
rapido ed approfondito, di programmare in BASIC. 

Dopo un'introduzione di carattere generale (sistema binario e struttura ba¬ 
se di programma...) si entra nel vivo della programmazione. 

Si susseguono: costanti e variabili, variabili array, i comandi, le istruzioni, la 
preparazione di un flow-chart, il trattamento delle stringhe, la stampante, 
alcune routine di gestione stampa, i nastri, il disco, comandi di DOS sup- 
port, i file dati, i messaggi d’errore, la tecnica di funzionamento overlay,... 
Vi sono infine alcune Appendici tra le quali troverete le funzioni speciali del 
CBM 8000 e alcuni programmi dimostrati su M20. 

In un solo libro, insomma, è compendiato tutto quello che occorre per 
utilizzare al meglio due tra i più diffusi Personal Computer. 
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